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INTRODUCTION 


A large  percentage  of  the  simulation  and  flight  test  programs  conducted  by 
the  Advanced  Avionic  Systems  Technical  Area  have  a need  to  display  a variety  of 
different  types  of  command  and  flight  control  information  to  a pilot  to  assist 
him  in  performing  a task  (e.g.,  hovering  or  nap-of-the-earth  (NOE)  maneuvering). 
To  satisfy  this  need,  a project  was  undertaken  to  develop,  for  R&D  purposes,  a 
TV  display  which  would  provide  the  reliability  and  ease  of  set-up  that  is  neces- 
sary for  an  airborne  device  and,  at  the  same  time,  allow  for  adequate  flexibi lity 
to  quickly  reconfigure  the  displayed  symbols.  The  purpose  of  this  report  is  to 
provide  documentation  for  the  Digital  Symbology  Generator  (DSG)  program,  the 
software  portion  of  this  display  system.  This  report  is  not  intended  to  provide 
a detailed  insight  into  the  various  algorithms  used  to  generate  each  symbol,  but 
is  intended  to  provide  an  understanding  of  the  program's  capability  and  to  serve 
as  a guide  to  enable  the  reader  to  understand  what  must  be  done  to  operate  and 
use  the  program. 

2.  BACKGROUND  AND  APPROACH 


Earlier  TV  displays  used  by  the  Technical  Area  for  simulation  and  flight 
test  experiments  have  been  of  the  all  analog  type  and  have  suffered  from  sev- 
eral disadvantages.  The  most  serious  of  these  are: 

a.  The  addition  of  new  symbols  require  that  hardware  modification  be  made 
to  the  display. 

b.  Displays  used  for  laboratory  simulation  studies  are  not  easily  incor- 
porated into  the  follow-on  flight  test  programs. 

c.  Numerous  trim  pot  adjustments  (such  as,  symbol  size,  centering,  and 
scaling)  are  generally  necessary  for  the  initial  set-up. 

The  acquisition  by  the  Technical  Area  of  two  SKC-2000  airborne  computers 
has  made  it  possible  to  consider  an  all-digital  approach  in  the  development  of 
an  R&D  display  which  would  possess  the  characteristics  needed  for  both  simula- 
tion and  flight  test  studies.  A block  diagram  of  the  approach  which  has  been 
taken  is  shown  in  Figure  1.  The  block  diagram  is  divided  into  three  sections 
as  follows: 

a.  A digital  computer  program  to  generate  symbology  (Digital  Symbology 
Generator)  within  a 256  by  256  bit  binary  matrix. 

b.  Special  purpose  TV/Computer  interface  (Digital-to-Video  Converter- 
DVC)  electronics  to  convert  the  digitally  stored  256  by  256  bit  binary  array 
to  composite  TV  video  signal. 

c.  A standard  525  line  TV  monitor  with  conventional  deflection  circuitry 
and  picture  tube  electronics. 

This  report  is  concerned  mainly  with  subparagraph  a above.  Subparagraphs 
b and  c above  are  covered  in  detail  in  Reference  1 and  will  be  only  briefly  ex- 
plained in  this  report. 


*£0)11-4506,  "A  Digital-to-Video  Converter  for  Airborne  Television  Displays 

Edward  A.  Karcher,  Avionics  Laboratory,  July  1977. 
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The  DVC  hardware  shown  in  Figure  1,  includes  two  semi-conductor  random 
access  memories  (RAM),  marked  A and  B in  the  block  diagram,  each  representing 
a 256  by  256  bit  binary  matrix.  The  TV  scan  control  and  synchronization  cir- 
cuitry permits  one  memory  (say,  B)  to  be  scanned  at  TV  video  rates  while  the 
other  memory  (A)  is  being  asynchronously  (i.e.,  not  synchronized  with  the  TV 
video  scan  rates)  loaded  through  the  direct  memory  access  (DMA)  with  symbology 
previously  generated  within  the  SKC-2000  core  memory.  The  scanning  of  B is 
accomplished  by  loading  a full  256  bit  line  from  B into  a 256  bit  shift  regis- 
ter. This  register  is  then  shifted  out  serially  at  the  horizontal  scan  rate 
of  a standard  TV  through  an  OR  gate  where  it  is  mixed  with  vertical  and  horizon- 
tal synchronization  pulses  to  create  a composite  2 level  TV  video  signal.  The 
B array  is  continually  scanned  on  a line-by-llne  basis  in  this  manner  until 
the  asynchronous  loading  of  A is  complete.  Upon  completion  of  the  loading  of 
A,  and  on  the  next  vertical  blanking  pulse,  a switchover  occurs  and  A becomes 
the  scanned  matrix  to  be  loaded  with  new  data  from  the  SKC-2000. 

Using  this  "ping-pong"  scheme  of  scanning  one  matrix  at  TV  rates  while 
the  other  matrix  is  being  loaded,  an  update  rate  of  the  TV  display  can  be  ac- 
complished at  a maximum  of  30  times  per  second.  Although  RAM's  are  being  used 
in  the  scan  conversion  hardware,  a true  random  access  of  the  matrix  must  be 
accomplished  sequentially  through  the  DMA.  This  technique  enables  loading  the 
RAM's  with  only  a minimum  CPU  time  required  to  set  up  the  DMA. 

3.  INITIAL  DSG  INVESTIGATION  AND  PROGRAM  ORGANIZATION 


Some  of  the  ground  rules  and  program  goals  which  were  established  for  the 
development  of  the  DSG  program  were  as  follows: 

a.  The  DSG  program  should  be  written  in  assembly  language  for  the  SKC-2000 
airborne  computer.  The  SKC-2000  computer  was  developed  by  the  Kearfott  division 
of  the  Singer  Company  and  is  a 16K  (32  bit/word)  core  memory  machine  with  a 
floating  point  processor.  Two  of  these  machines  were  purchased  - one  for  in- 
stallation within  the  computer  facility  and  one  for  installation  in  the  EVAR 
(Experimental  Vehicle  for  Avionics  Research)  flight  test  vehicle.  The  principal 
peripherals  available  for  the  airborne  machine  are  two  magnetic  tape  units,  I/O 
typewriter  with  cassette  mag  tape  read/write  option,  and  paper  tape  punch  and 
reader.  The  laboratory  unit  also  has  a card  reader  and  an  electrostatic 
printer/plotter  in  addition  to  the  peripherals  available  on  the  airborne  machine. 

b.  A family  of  symbol  types  should  be  developed  that  would  include,  as  a 
minimum,  the  symbol  set  available  on  the  all-analog  TV  displays  (i.e.,  straight 
lines,  vectors,  boxes,  crosses,  circles,  etc.). 

c.  The  program  should  facilitate  quick  addition  or  deletion  of  the  various 
symbol  types. 

d.  Execution  time  of  the  program  should  be  held  to  a minimum.  As  a pro- 
gram goal,  the  execution  time  should  not  be  greater  than  10-20  milliseconds. 

Early  in  the  investigation  it  became  obvious  that  the  program  organization 
and  the  choice  of  symbol  types  would  be  greatly  influenced  by  several  factors. 
Some  of  the  more  significant  factors  and  the  particular  aspects  of  the  DSG  that 
they  affected  will  now  be  discussed. 
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The  choice  of  symbol  set  was  affected  by  the  fact  that  the  array  in  which 
the  symbols  would  be  generated  was  rectangular.  This  meant  that,  computation- 
ally, it  would  be  simpler  and  also  require  less  execution  time  to  perform  oper- 
ations that  are  rectangular  rather  than  polar  in  nature.  For  this  reason,  sym- 
bols such  as  lines  and  vectors  that  are  free  to  rotate,  and  geometrically 
shaped  symbols  that  are  free  to  change  size,  should  be  kept  to  a minimum  so 
as  not  to  extend  the  program  execution  time  beyond  a tolerable  limit.  Because 
the  attitude  line  and  vector  symbols  are  such  familiar  symbols  on  flight  dis- 
plays, both  symbols  are  included  in  the  selected  symbol  set  (listed  later), 
and,  as  expected,  require  the  longest  execution  times.  It  is  estimated  that 
75  percent  of  the  coding  time  for  the  DSG  was  spent  in  developing  fast  execu- 
tion algorithms  that  would  allow  the  rotation  and  translation  of  these  two 
symbols.  * 

A factor  which  affected  the  total  amount  of  SKC-2000  memory  that  the  DSG 
required  was  the  necessity  to  store  the  entire  256  by  256  bit  (2048  full  words) 
array  in  memory  for  generation  of  the  symbols.  This  need  to  store  the  entire 
array  rather  than  a smaller  array,  such  as  that  for  a single  raster  line,  came 
about  because  of  constraints  by  the  DVC  hardware.  A raster  line  by  raster  line 
approach  for  the  symbol  generation  would  greatly  extend  the  total  execution 
time  for  the  DSG,  since  each  symbol  could  not  be  computed  through  to  completion 
taking  advantage  of  symbol  symmetry.  Also,  the  inability  to  "OR"  and  clear  the 
DVC  array  made  it  impractical  to  transfer  each  symbol  to  the  DVC  as  it  is  being 
generated. 

Another  factor  which  also  affected  the  total  amount  of  SKC-2000  memory  re- 
quired was  the  decision  to  store  tables  of  trig  functions  for  fast  access  rather 
than  compute  the  functions  through  the  library  subroutine  at  execution  time. 

This  decision  was  made  simply  to  reduce  execution  time  at  the  expense  of  ad- 
ditional storage.  A decision  of  this  type  is  typical  of  the  trade-off  that  must 
be  continually  made  to  reduce  execution  time  in  a time  critical  program.  For 
this  case,  approximately  1,000  full  words  of  additional  storage  was  sacrificed 
to  gain  an  estimated  fifteen-fold  increase  in  the  speed  of  computing  a trig 
function. 

4.  THE  SYMBOL  TYPES 

Based  on  the  intial  DSG  investigation,  as  well  as  the  anticipated  require- 
ments of  future  laboratory  and  flight  test  experiments,  several  symbol  types 
were  selected  for  generation  by  the  DSG.  Each  of  these  symbol  types  is  dis- 
cussed in  the  paragraphs  that  follow.  The  discussion  of  each  symbol  will  in- 
clude the  following: 

Commanded  inputs  and  maximum  range  — the  real  time  symbol  positioning 
command  and  the  maximum  range  of  variation  of  the  symbol. 

Reconfiguration  parameters  — parameters  which  can  be  changed,  but  will 
normally  be  changed  under  non-real  time  control. 

Number  available  — the  number  of  symbols  of  each  type  that  is  available 
for  real  time  selection. 

I 
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a.  Artificial  Horizon  Line.  This  symbol  consists  of  a sequence  of  points, 
approximating  a straight  line,  that  extends  across  the  256  by  256  bit  array. 

(1)  Commanded  inputs  and  range  — 

Roll  angle,  + tt/2  radians 
Pitch  angle,  + 1 radian 

(2)  Reconfiguration  parameters  — none 

(3)  Number  available  — 1 each 

This  symbol  will  normally  be  used  in  conjunction  with  an  attitude  reference 
mark.  An  attitude  reference  mark  symbol  is  included  as  one  of  the  two  degree- 
of-freedom  fixed  size  symbols  described  later. 

b.  Vector.  This  symbol  consists  of  a sequence  of  points  representing  a 
straight  line  segment  which  connects  a base  point  and  end  point.  The  vector 
can  be  positioned  anywhere  within  the  array.  Both  the  base  and  end  point  are 
free  to  move. 

(1)  Command  inputs  and  maximum  range  — 

Base  point  rectangular  coordinates,  total  array  area. 

End  point  rectangular  coordinates,  total  array  area. 

(2)  Reconfiguration  parameter  — range 

(3)  Number  available  — 1 each 

c.  Airspeed  Symbol.  This  symbol  consists  of  a reference  mark  and  a 
vertically  movable  scale  or  tape  that  is  graduated  and  numbered  to  enable  dis- 
play of  aircraft  airspeed  to  within  + 1 knot.  This  symbol  is  generated  by  dis- 
playing a portion  of  a stored  dot  array.  A portion  of  this  stored  array  is 
shown  in  Figure  2. 

(1)  Command  input  and  maximum  range  airspeed,  0 to  140  knots. 

(2)  Reconfiguration  paramaters  — 

Amount  of  the  scale  that  is  visible 
Location  of  the  scale  within  the  raster 

(3)  Number  available  — 1 each 

d.  Heading  Symbol.  This  symbol  consists  of  a reference  mark  and  a hori- 
zontally movable  scale  that  is  graduated  and  numbered  to  enable  display  of 
aircraft  heading  to  within  + 1 degree.  This  symbol  is  generated  in  a manner 
similar  to  the  airspeed  symbol  by  displaying  a portion  of  a stored  dot  array. 

A portion  of  the  heading  tape  is  shown  in  Figure  3. 
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(1)  Command  inputs  and  maximum  range  — 

Heading  angle,  + 360  degrees  continuous 

(2)  Reconfiguration  parameters  — 

Amount  of  the  scale  that  is  visible 

Vertical  location  of  the  scale  within  the  raster. 

(3)  Number  available  — 1 each 

e.  Vertical  Scale.  This  symbol  is  used  to  provide  a vertical  scale 
which  can  be  centered  on  cny  of  the  eight  vertical  word  columns  in  the  array. 
(The  DSG  program  separates  the  256  bit  width  of  the  array  into  eight  32  bit 
word  columns.) 

(1)  Command  inputs  and  maximum  range  — none 

(2)  Reconfiguration  parameters  — 

Scale  location 

Separation  of  scale  divisions 
Number  of  scale  divisions 

(3)  Number  available  — 2 each 

This  symbol  is  used  in  conjunction  with  vertical  degree-of-f reedom  (DOF)  sym- 
bols, such  as,  pointers  or  a vertical  bar  symbol  as  described  later.  Also, 
reference  marks  for  the  vertical  scale  must  be  provided  from  the  vertical  DOF 
symbol  type. 

f.  Horizontal  Scales.  This  symbol  is  similar  to  the  vertical  scale,  ex- 
cept it  is  oriented  horizontally. 

(1)  Command  inputs  and  maximum  range  — none 

(2)  Reconfiguration  parameters  — 

Scale  vertical  location 
Starting  horizontal  position 
Number  of  divisions 

Width  of  scale 

(3)  Number  available  — 2 each 
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g.  Vertical  Bar  Symbol.  This  symbol  consists  of  a narrow  bar  or  ribbon 
similar  to  a thermometer  which  can  be  controlled  to  extend  or  shorten  its 
length  in  either  a positive  or  negative  direction  from  a specified  reference 
point.  This  symbol  is  normally  used  in  conjunction  with  a vertical  scale 
symbol . 

(1)  Commanded  inputs  and  maximum  range  — 

Bar  length,  total  array  length 

(2)  Reconfiguration  parameters  — 

Bar  sensitivity 
Horizontal  position 

Upper  and  lower  bar  limits 

(3)  Number  available  — 2 each 

h.  Vertical  Degree-of-Freedom  Symbol.  This  is  a fixed  size  symbol  type 
which  can  be  controlled  to  translate  in  the  vertical  direction  only.  This 
symbol  can  be  located  in  any  of  the  eight  selectable  vertical  word  columns  in 
the  array.  The  symbol's  shape  is  determined  by  a stored  dot  array.  Examples 
of  these  stored  arrays  are  shown  in  Figure  4. 

(1)  Commanded  inputs  and  maximum  range  — 

Vertical  position,  total  array  height 

(2)  Reconfiguration  parameters  — 

Horizontal  position 

Symbol  sensitivity 

Upper  and  Lower  symbol  limits. 

(3)  Number  available  — 8 each,  as  specified  below 
Right  pointing  indicator 

Left  pointing  indicator 
Left  side  reference  mark 
Right  side  reference  mark 
CRUISE  alpha  symbol 
TRANS  aipha  symbol 
HOVER  alpha  symbol 
BOB-UP  alpha  symbol 
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i.  Two  Degree-of-Freedom  Symbol.  This  is  a fixed  size  symbol  type  which 
can  be  controlled  to  translate  in  both  the  vertical  and  horizontal  directions. 
The  symbol  shape  is  determined  by  a stored  dot  array.  These  symbols  normally 
consist  of  simple  geometric  shapes  such  as  those  shown  in  Figure  5. 

(1)  Commanded  inputs  and  maximum  range  — 

Vertical  position,  total  array  height 
Horizontal  position,  total  array  width 

(2)  Reconfiguration  parameters  — 

Symbol  sensitivity 

(3)  Number  available  — 13  each,  as  specified  below 
Large  cross 

Small  cross 
Large  circle 
Small  circle 
Small  solid  circle 
Down  pointer 
Up  pointer 
Small  solid  diamond 
Large  broken  circle 
Large  square 
Attitude  reference  mark 
Male  symbol 
Female  symbol 

5.  DISCUSSION  OF  THE  OPERATION  OF  THE  DSG  PROGRAM 

The  explanation  of  the  DSG  program  operation  will  be  divided  into  three 
sections  in  which  each  section  corresponds  to  a major  subdivision  of  the  DSG 
program.  The  three  major  subdivisions  of  the  DSG  program  are  as  follows: 

a.  The  common  storage  area  (LSICMN  and  CORECMN) 

b.  The  DSG  main  program  (SYMGEN) 
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c.  The  symbol  subprograms  (ATLINE,  VECTOR,  AIRSPD,  COMPASS,  VSCALE, 

HSCALE,  VBAR,  VDOF,  XYDOF,  and  DRDOUT) , 

A memory  map  of  the  DSG  program  is  shown  in  Figure  6.  The  complete  DSG  program 
listings  and  the  assembly  language  mnemonics  are  included  in  Appendix  A. 

a.  The  Common  Storage  Area.  The  LSICMN  and  CORECMN  sections  of  the  pro- 
gram are  memory  storage  areas  that  can  be  accessed  by  all  DSG  program  routines. 

The  LSICMN  area  is  located  in  the  fast  RAM  (random  access  memory)  - a 256  full 

word  area  of  volatile  memory  with  a .5  ys  cycle  time.  Because  the  contents  of 
this  section  of  memory  would  be  destroyed  if  the  machine  was  powered  down,  the 
LSICMN  area  is  used  only  for  storage  of  temporary  information.  A total  of  10 
full  words  of  storage  is  set  aside  for  use  as  temporary  storage  of  argument 
lists  as  they  are  transferred  into  a subprogram  and  5 full  words  of  storage  are 
used  as  a general-purpose  scratch-pad  area.  The  CORECMN  area  is  located  in  the 
slower  (1.0  ps  cycle  time)  core  memory  section  of  the  SKC-2000.  The  information 
stored  in  the  CORECMN  includes: 

(1)  The  TVRSTR  (the  256  by  256  bit  array  that  requires  2048  full 
words)  in  which  all  symbols  are  generated  before  being  output  to  the  TV  display. 

(2)  Bit  masks  (BMSK0  and  BMSKI)  used  by  the  symbol  subprograms  for 
"0R"ing  in  individual  bit  patterns  during  symbol  generation. 

(3)  Trig  table  arrays  (COSTBL  and  TANTBL  each  require  514  full  words) 
for  the  storage  of  trig  functions  for  fast  access  during  execution  time. 

(4)  Miscellaneous  constants  required  by  the  subprograms. 

b.  The  DSG  Main  Program.  The  DSG  main  program  is  called  SYMGEN.  SYMGEN 
has  been  written  in  subroutine  form  and  must  be  called  by  a master  main  (or 
calling)  program.  Normally,  the  master  main  program  will  provide  a real  time 
clocked  interrupt  routine  from  which  SYMGEN  will  be  called.  The  calling  pro- 
gram must  provide  a symbol  select  argument  (described  later)  and  symbol  drive 
command  to  the  SYMGEN  program.  The  symbol  select  argument  must  be  placed  im- 
mediately after  the  call  to  the  SYMGEN  subroutine  in  the  master  main  code  as 
follows: 


* MASTER  MAIN  PROGRAM 


SYMGEN  SETX  07152 


JS  SYMGEN  * CALL  THE  SYMGEN  SUBROUTINE 

HEX  nnnnnnn*  SYMBOL  SELECT  ARGUMENT 
. *8  hexadeciman  characters) 


13 


MEMORY  ADDR 
(HEX) 


DS6  PROGRAM  ELEMENT 
& THE  NUMBER  OF  HALF 
WORD  MEMORY  LOCATIONS 


03E00 

06  m 


07152 

07500 


ARGLST 

(20) 

TEMP 

(10) 

ATLINE 

(594) 

VECTOR 

(480) 

COMPASS 

(930) 

AIRSPD 

(730) 

V SCALE 

(100) 

H SCALE 

(120) 

V BAR 

(140) 

VDOF 

(220) 

XYOOF 

(720) 

DROOUT 

(400) 

SYMGEN  (940) 

LSI CMN 

1 


SYMBOL  SUBPROGRAMS 


♦ 


DSG^MAIN  PROGRAM 


08000 


0949C 


TVRSTR 

(4096) 

COSTBL 

(514) 

TANTBL 

(514) 

BMSK0 

(64) 

BMSKI 

(64) 

MISC 

(26) 

CORECMN 


Figure  6.  DSC  program  memory  map 
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The  symbol  drive  commands  must  be  stored  directly  in  the  SYMGEN  program  by  the 
master  main  program  or  by  another  routine  which  is  also  called  by  the  master 
main  program. 

A flow  chart  of  the  operation  of  the  SYMGEN  is  given  in  Figure  7,  and  will 
now  be  discussed. 

The  first  operation  performed  on  each  pass  through  SYMGEN  is  to  save  the 
contents  of  all  program  and  index  registers  that  will  be  changed  by  SYMGEN  or 
any  subroutine  called  by  SYMGEN.  The  final  operation  performed  on  each  pass 
is  to  restore  the  original  contents  of  these  registers.  These  two  operations 
are  performed  to  allow  SYMGEN  to  be  called  as  part  of  an  interrupt  routine 
without  having  SYMGEN  destroy  the  contents  of  registers  needed  by  the  routine 
being  interrupted. 

The  next  operation  is  a test  to  determine  if  this  is  the  first  time  SYMGEN 
has  been  called.  If  it  is,  then  the  tables  of  trig  functions  are  generated  for 
use  by  the  symbol  subroutines  during  subsequent  passes.  If  the  calling  program 
uses  a real  time  clock  interrupt  routine,  the  SYMGEN  program  should  be  called 
at  least  once  before  enabling  the  clocked  interrupt  routine.  This  is  necessary 
since  the  generation  of  the  trig  tables  takes  approximately  150  ms  and  could 
overrun  the  clocked  interrupt  frame. 

Next,  the  symbol  select  argument  is  transferred  from  the  master  main  pro- 
gram and  stored  in  the  SYMGEN  in  a location  called  SYMSEL.  The  SYMSEL  argument 
is  a coded  word  used  by  the  SYMGEN  program  to  determine  which  symbols  are  to  be 
generated  for  the  current  pass  through  the  program.  Figure  8 shows  the  SYMSEL 
word  and  the  particular  symbol  type  that  each  of  the  32  bit  position  corre- 
sponds to.  The  table  also  shows  four  examples  of  the  SYMSEL  hexadecimal  code 
for  the  four  symbol  sets  shown  in  Figures  9 through  12.  These  figures  were 
generated  by  outputting  the  TVRSTR  onto  a Varian  Electrostatic  line  printer. 
Appendix  B contains  a listing  of  this  output  program  (PRNTSM) . 

Continuing  the  discussion  of  the  SYMGEN  flow  chart,  the  next  operation  to 
be  performed  is  to  clear  the  TVRSTR.  This  operation  removes  all  symbols  gen- 
erated on  the  previous  pass  before  generating  the  updated  symbols.  This  opera- 
tion is  not  required,  if  the  hardware  clear  option  is  selected  when  the  DMA 
(direct  memory  access)  output  is  initiated  later  in  the  frame.  This  option,  a 
recent  SKC-2000  interface  hardware  modification,  results  in  a considerable  time 
savings  (on  the  order  of  4 ms)  on  each  pass  through  the  program.  The  hardware 
clear  is  accomplished  while  the  TVRSTR  is  being  outputted  to  the  DVC  (see 
Figure  1). 

After  the  clearing  operation,  the  symbol  generation  begins.  Each  bit  in 
the  SYMSEL  word  is  tested  and  the  corresponding  symbol  is  either  generated  or 

skipped  if  the  bit  is  "1"  or  "0,"  respectively. 

On  completion  of  the  last  symbol,  the  DMA  is  initiated  and  the  TVRSTR  is 

transferred  to  the  DVC  to  allow  display  of  the  symbols  on  the  TV  screen.  The 

final  operation,  as  mentioned  earlier,  is  to  restore  all  registers  to  their 
original  contents  and  return  to  the  master  main  program. 
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Figure  7.  DSG  main  program  (SYMGEN)  flow  chart 
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Figure  12.  BOB-UP  mode  symbology  - example  4 
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c.  The  Symbol  Subprograms.  Subroutines  have  been  written  to  permit  gen- 
eration of  each  of  the  symbol  types  discussed  in  paragraph  4.  It  is  possible 
to  call  the  same  subroutine  more  than  once  within  the  same  frame  if  several  of 
the  same  types  of  symbols  are  desired.  However,  a separate  agrument  list  is 
required  for  each  call  of  a subroutine.  The  SYMGEN  puts  some  restrictions  on 
the  maximum  number  of  times  a particular  subroutine  can  be  called.  Should  a 
symbol  set  be  desired  that  exceeds  any  of  these  maximum  numbers,  the  SYMGEN 
program  would  have  to  be  reassembled  to  permit  the  new  maximums.  The  current 
maximums  for  each  symbol  type  is  given  in  the  discussion  of  the  symbol  types 
in  paragraph  4. 

The  discussion  of  the  individual  symbol  subroutines  will  include  an  ex- 
planation of  each  symbol's  argument  list  and  an  example  accompanied  by  the 
calling  sequence  which  produced  the  example.  Figures  are  shown  for  each  symbol 
type  example.  The  figures  were  generated  by  the  PRNTSM  program  in  Appendix  B. 
Grid  lines  are  provided  (a  feature  of  the  PRNTSM  routine  only  - these  would  not 
appear  on  an  actual  TV  display)  on  some  of  the  figures  to  better  illustrate  the 
magnitude  of  symbol  displacement  and  symbol  size. 

(1)  Artificial  Horizon  Line  (ATLINE)  subprogram.  The  operations  of 
the  ATLINE  subroutine  requires  that  the  two  arguments  as  listed  below  be  de- 
fined in  the  calling  routine  (SYMGEN)  in  the  order  specified. 

FI  — Commanded  Roll  Angle  - Radians  (fl  pt) 

TH  — Commanded  Pitch  Angle  - Radians  (fl  pt) 

There  are  no  limitations  on  the  magnitude  of  these  input  variables;  however, 
the  artificial  horizon  line  can  go  out  of  view  for  certain  values  of  FI  and  TH 
(e.g.,  TH  = + 1.0  radians  and  FI  = 0.0  radians).  The  coordinate  system  has  its 
origin  at  the  center  of  the  TVRSTR  array. 

Figure  13  is  an  example  of  the  artificial  horizon  line  and  the  calling 
sequence  and  argument  list  that  produced  it. 

(2)  Vector  (VECTOR)  subprogram.  The  VECTOR  subprogram  permits  the 
generation  of  a straight  line  segment  originating  from  a base  point,  PI,  and 
terminating  on  an  end  point,  P2.  Both  the  base  point  and  end  point  are  program 
variables.  The  operation  of  this  subprogram  requires  that  the  arguments  speci- 
fied below  be  defined  in  the  calling  routine  (SYMGEN)  in  the  order  specified. 

XI  Base  point  X Command  (+  1.0  max  value  - fl  pt) 

Y1  Base  point  Y Command  (+  1.0  max  value  - ft  pt) 

Y2  End  point  X Command  (+  1.0  max  value  - fl  pt) 

Y2  End  point  Y Command  (+  1.0  max  value  - fl  pt) 

MARGIN  Width  of  the  outer  boundary  (+  128  max  value  - ft  pt) 
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Figure  13.  ATLINE  symbol  with  argument  list  and  calling  sequence 
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Figure  14  is  an  example  of  a VECTOR  symbol  and  the  associated  calling  sequence 
and  argument  list.  For  this  example  the  base  point  PI  (XI,  Yl)  = 0.0,  -0.5) 
and  end  point  P2  (X2,  Y2)  = (+  0.75,  + 0.25).  The  VECTOR  coordinate  points 
are  referenced  to  a coordinate  system  centered  in  the  TVRSTR  array.  The  argu- 
ment MARGIN  was  set  to  16.$  in  this  example.  This  value  of  MARGIN  allows  the 
VECTOR  symbol  to  be  scaled  to  have  the  same  coordinate  system  limits  as  the 
XYDOF  symbols. 

(3)  Airspeed  indicator  (.AIRSPD)  subroutine.  The  operation  of  the 
AIRSPD  subroutine  uses  the  four  arguments  listed  below.  These  arguments  must 
be  set  aside  in  the  SYMGEN  or  the  calling  program  in  the  order  specified. 

ASPD  — Commanded  airspeed  input  - knots  (ft  pt) 

SCLGTH  — Visible  scale  length  - raster  lines  (integer) 

RFMSKA  — Word  number  of  reference  mark  (integer) 

SCLSA  — Word  number  of  the  top  of  the  visible  scale  (integer) 

The  current  version  of  the  AIRSPD  subroutine  will  limit  at  + 140  and  0 knots. 

Figure  15  is  an  example  of  the  airspeed  scale  produced  by  the  calling 
sequence  and  argument  list  accompanying  the  figure. 

(4)  Heading  scale  (COMPASS)  subroutine.  The  operation  of  the  COMPASS 
subroutine  requires  only  that  a single  argument  as  indicated  below  be  provided 
in  the  SYMGEN  or  calling  program. 

HDG  — Commanded  heading  input  - degree  (ft  pt) 

The  COMPASS  subroutine  will  accept  inputs  ranging  from  0 to  360  degrees. 

Figure  16  is  an  example  of  the  heading  scale  produced  by  the  calling 
sequence  and  argument  included  with  the  figure. 

(5)  Vertical  Scale  (Fixed)  (VSCALE)  subprogram.  The  VSCALE  subpro- 
gram allows  for  the  generation  of  fixed  vertical  scales  located  in  any  of  the 
eight  raster  word  columns.  The  set-up  and  location  of  this  symbol  type  re- 
quires that  the  subroutine  arguments  as  defined  below  be  pre-set  in  che  SYMGEN 
routine  in  the  order  specified.  The  suffix,  small  n,  is  a scale  identification 
number.  The  present  SYMGEN  configuration  allows  two  vertical  scales  in  which 

n equals  0 or  1.  Scale  pointers  and  reference  marks  must  be  provided  by  the 
vertical  degree-of-freedom  (VDOF)  symbol  subprogram. 

HPOSn  — Raster  word  column  number  (integer  format)  of  the  horizontal 
position  of  the  scale. 

VSCLCn  — Raster  line  number  (integer  format)  of  the  scale  center  mark. 

VSPCn  — Raster  line  spacing  (integer  format)  between  two  scale  divisions. 

VMRKSn  — The  total  number  of  scale  divisions  (integer  format),  excluding 
the  scale  center. 
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Figure  14.  VECTOR  symbol  with  argument  list  and  calling  sequence 
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Figure  15.  AIRSPD  symbol  with  argument  list  and  calling  sequence 
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Figure  16.  COMPASS  symbol  with  argument  list  and  calling  sequence 
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The  SYMGEN  calls  the  VSCALE  subroutine  once  for  each  vertical  scale  that  is 
desired  on  the  display.  For  each  vertical  scale,  a corresponding  argument 
list  must  exist  in  the  storage  area  of  the  SYMGEN. 

Figure  17  is  an  example  of  a vertical  scale  which  was  produced  by  the 
calling  sequence  which  accompanys  the  figure, 

(6)  Horizontal  Scale  (Fixed)  (HSCALE)  subprogram.  The  HSCALE  sub- 
program provides  for  the  generation  of  fixed  horizontal  scales  which  can  be 
positioned  vertically  to  begin  on  any  of  the  256  raster  lines.  The  set-up  and 
location  of  an  HSCALE  symbol  requires  that  the  argument  list  as  defined  below 
be  pre-set  in  the  SYMGEN  routine  in  the  order  specified.  The  suffix,  small  n, 
permits  differentiation  between  HSCALE  symbols.  The  current  SYMGEN  configura- 
tion allows  two  horizontal  scales  in  which  n is  equal  to  0 and  1.  Indicator 
marks  and  reference  marks  for  the  HSCALE  symbols  must  be  provided  through  the 
XYDOF  symbol  subroutine. 

VPOSn  — Raster  line  vertical  position  of  the  HSCALE  center  (integer). 

HSTRTn  — Word  column  number  (integer)  of  the  left  most  starting  position 
of  the  scale. 

HMSKn  — Selects  the  number  of  divisions  in  the  word  columns  (integer). 

HSIZEn  — Width  of  scale  in  word  columns  (integer). 

The  SYMGEN  must  call  the  HSCALE  subroutine  once  for  each  horizontal  scale 
desired.  Each  scale  requires  that  a separate  argument  list  be  provided  by  the 
SYMGEN. 

Figure  18  is  an  example  of  a horizontal  scale  which  was  produced  by  the 
calling  sequence  accompanying  the  figure. 

(7)  Vertical  Bar  (VBAR)  subprogram.  The  VBAR  subprogram  provides  for 
the  generation  of  a vertical  bar  symbol  emanating  from  a prescribed  origin  and 
whose  length  can  be  controlled  to  extend  in  either  an  upward  or  downward  direc- 
tion. The  VBAR  subroutine  argument  list,  as  defined  below,  must  be  pre-set  in 
the  SYMGEN  routine  in  the  order  specified.  The  suffix,  small  n,  is  used  to 
differentiate  between  two  or  more  VBAR  symbols.  The  present  configuration  of 
the  SYMGEN  permits  two  vertical  bar  symbols  in  which  n equals  0 and  1. 

YBARn 

KABARn 

KBBARn 

HPVBn 

BARSLn 

VBULn 

VBLLn 


— Symbol  input  drive  variable  (fl  pt)  maximum  absolute  valve  - 1.0 

— Scaling  parameter  (fl  pt) 

— Sealine  parameter  (fl  pt) 

— Raster  word  column  number  of  symbol  horizontal  position  (integer) 

— Bar  position  select  code  within  the  word  column  (integer) 

— VBAR  symbol  upper  limit  (fl  pt) 

— VBAR  symbol  lower  limit  (fl  pt) 
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Figure  17.  VSCALE  symbol  with  argument  list  and  calling  sequence 
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Figure  18.  HSCALE  symbol  with  argument  list  and  calling  sequence 
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Figure  19  shows  an  example  of  a vertical  bar  symbol  used  in  conjunction 
with  a vertical  scale.  The  VBAR  symbol  was  produced  by  the  calling  sequence 
accompanying  the  figure.  For  this  example,  the  bar  originates  from  raster  line 
224  and  limits  at  raster  line  32  in  the  upward  direction. 

Assignment  of  value  of  0 (integer  format)  to  HPVB0  places  the  vertical 
bar  in  raster  word  column  0 (to  coincide  with  the  vertical  scale).  Assignment 
of  any  other  value  to  this  argument  will  place  the  bar  in  one  of  the  other 
word  columns  and  out  of  proximity  of  the  scale. 

The  input  variable  YBAR0  has  been  given  an  upper  limit  (VBUL0  = 1.0)  and 
a lower  limit  (VBLL0  = 0.0). 

Determination  of  KABAR0  and  KBBAR0  can  be  accomplished  using  the  linear 
relationship  which  exists  between  the  scaled  input  YBAR0  and  the  TV  raster 
variable  Yg  (0  £ yr  5 255) 

Yr  = KABAR0  * YBAR0  + KBAR0 

From  the  figure  Yg  = 32  when  YBAR  = 1.0  and  Yg  = 224  when  YBAR0  = 0.0.  Using 
this  information  and  the  above  relationship,  two  equations  in  KABAR0  and  KBBAR0 
can  be  solved  simultaneously  to  give 

KABAR0  = -192.0,  KBBAR0  = 224.0 

(8)  Vertical  Degree-of-Freedom  (VDOF)  subprogram.  The  VDOF  sub- 
program provides  for  the  generation  of  symbols  which  can  be  controlled  to  move 
in  the  vertical  direction  only.  Proper  scaling  and  location  of  a VDOF  symbol 
is  similar  to  the  VBAR  symbol.  The  VDOF  symbol  requires  that  the  subrouting 
arguments,  as  defined  below,  be  pre-set  in  the  SYMGEN  in  the  order  specified. 

The  suffix,  small  n,  serves  as  a VDOF  symbol  identifier.  The  present  configur- 
ation of  the  SYMGEN  permits  a total  of  nine  VDOF  symbols  to  be  generated  per 
frame. 

YDOFn  — Symbol  input  device  command  (+1.0  max  value,  fl  pt) 

KAVDn  — Scaling  parameter  (fl  pt) 

KBVDn  — Scaling  parameter  (fl  pt) 

HPVDn  — Raster  word  column  number  of  symbol  horizontal  position  (integer) 

VDSELn  — VDOF  symbol  selection  code  (integer) 

VDULn  — VDOF  symbol  upper  limit  (fl  pt) 

VDLLn  — VDOF  symbol  lower  limit  (fl  pt) 

Figure  20  shows  an  example  of  a VDOF  symbol  (right  pointing  indicator) 
used  in  conjunction  with  a vertical  scale.  The  VDOF  symbol  was  produced  by  the 
calling  sequence  and  argument  list  accompanying  the  figure.  For  this  example, 
the  pointer  is  free  to  move  to  raster  line  32  in  the  upward  direction  and  raster 
line  224  in  the  downward  direction.  The  pointers'  zero  position  is  raster  line 
224. 
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Figure  20.  VDOF  symbol  with  argument  list  and  calling  sequence 
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Assignment  of  the  value  of  zero  (integer  format)  to  argument  VDSEL0  causes 
the  VDOF  routine  to  select  a left  pointing  indicator.  Assignment  of  the  value 
of  one  to  this  argument  would  cause  the  VDOF  to  select  a right  pointing  indica- 
tor. 

Assignment  of  a value  of  zero  (integer  format)  to  HPVD0  places  the  selec- 
ted pointer  in  raster  word  column  zero  (to  coincide  with  the  vertical  scale). 
Any  other  value  for  this  argument  would  place  the  pointer  in  one  of  the  other 
word  columns  and  out  of  proximity  of  the  scale. 

The  input  variable  YDOF0  has  been  given  an  upper  limit  (VDUL0  = 1.0)  and 
a lower  limit  (VDLL0  = 0.0).  Caution  should  be  taken  in  selecting  these  limit 
parameters  to  prevent  overranging  of  the  symbol. 

Since  a linear  relationship  exists  between  the  scaled  input  variable 
YDOF0  and  Yr  (0  Yr  < 255) , the  two  scaling  parameters  KAVD0  and  KBVD0  can  be 
determined  by  using  the  following  equation 

Yr  = KAVD0  * YDOF0  + KBVD0 

From  the  figure  Yr  = 224  when  YDOF0  = 0.0  and  Yr  = 32  when  YDOF  = 1.0.  Using 
this  information  and  the  above  relationship,  two  equations  in  KAVD0  and  KBVD0 
can  be  solved  simultaneously  to  give 

KAVD0  = -192.0,  KBVD0  = 224.0 

Some  degree  of  care  should  be  taken  in  computing  these  scaling  parameters  to 
avoid  having  any  portion  of  a symbol  exceed  the  upper  or  lower  raster  line. 

If  any  portion  of  a symbol  should  fall  outside  the  range  of  the  raster,  a com- 
puter program  malfunction  will  almost  certainly  occur,  since  the  overranging 
will  over-write  portions  of  the  program  outside  the  bounds  of  the  TV  raster 
memory  array. 

The  symbol  select  code  VDSELn  is  as  follows: 

jn  Symbol 

0 Right  pointing  indicator 

1 Left  pointing  indicator 

2 Ref  mark  - right  side  of  scale 

3 Ref  mark  - left  side  of  scale 

4 CRUISE  alpha  symbol 

5 TRANS  alpha  symbol 


6 HOVER  alpha  symbol 
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(9)  Vertical  and  Horizontal  Degree-of-Freedom  (XYDOF)  subprogram. 

The  XYDOF  subprogram  provides  for  the  generation  of  fixed  size  symbols  which 
can  be  controlled  to  move  in  the  vertical  and  horizontal  directions.  Proper 
selection  and  scaling  of  an  XYDOF  symbol  requires  that  the  subroutine  arguments, 
as  defined  below,  be  pre-set  in  the  SYMGEN  routine  in  the  order  specified.  The 
suffix,  small  n,  serves  as  an  XYDOF  symbol  identifier.  The  present  configura- 
tion of  SYMGEN  permits  a total  of  13  XYDOF  symbols  to  be  generated  per  frame. 

XFXn  — Symbol  input  horizontal  drive  (fl  pt  maximum  absolute  value  = 1.0) 

YFXn  — Symbol  input  vertical  drive  variable  (fl  pt  maximum  absolute 
value  = 1.0) 

KAFXn  — Scaling  parameter  - vertical  input  (fl  pt  format) 

KBFXn  — Scaling  parameter  - vertical  input  (fl  pt) 

KCFXn  — Scaling  parameter  - horizontal  input  (fl  pt) 

KDFXn  — Scaling  parameter  - horizontal  input  (fl  pt) 

XYn  — XYDOF  symbol  selection  code  (integer) 

Figure  21  is  an  example  of  an  XYDOF  symbol  (large  cross).  This  symbol 
was  produced  by  the  calling  sequence  and  argument  list  accompanying  the  figure. 
For  this  example,  the  center  of  the  cross  is  free  to  move  from  raster  column  16 
on  the7 left  to  raster  column  240  on  the  right  and  from  raster  line  16  at  the 
top  to  raster  line  240  at  the  bottom.  The  zero  position  for  the  center  of  the 
cross  is  raster  column  128  and  raster  line  128. 

As  in  the  case  of  all  other  symbols,  when  determining  the  pre-set  values 
of  the  scaling  parameters,  care  should  be  taken  to  prevent  overranging  of  the 
symbols,  since  this  will  over-write  portions  of  the  program  outside  the  bounds 
of  the  TV  raster  memory  array  and  cause  the  program  to  "hang  up"  during  execu- 
tion. Since,  for  the  XYDOF  subprogram,  the  YFXn  and  XFXn  variables  are  limited 
to  4-  1.0  internal  to  the  program  and  cannot  te  adjusted  (as  in  the  VDOF  pro- 
gram), additional  care  must  be  taken  when  determining  the  scaling  parameters 
to  insure  that  the  full  range  of  these  variables  is  allowed.  A further  con- 
sideration which  must  be  made  in  preventing  overranging  is  to  include  the  over- 
all size  of  the  symbol  when  computing  the  scaling  parameters.  Even  though  the 
symbol  sizes  vary,  each  symbol  should  be  assumed  to  32  by  32  bits  (no  XYDOF 
symbol  exceeds  this  size),  and  scaled  to  limit  at  least  16  bits  from  the  out- 
side edge  of  the  raster  array. 

Determination  of  the  scaling  parameters  for  the  example  uses  the  linear 
relationship  that  exists  between  the  raster  coordinate  system  (Xg,  Yg)  and  the 
input  coordinate  system  (XFX2,  YFX2). 

Yg  = KAFX2  * YFX2  + KBFX2 


Xg  = KCFX2  * XFX2  + KDFX2 
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Figure  21.  XYDOF  symbol  with  argument  list  and  calling  sequence 
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From  Figure  21,  it  can  be  seen  that 
Yr  = 16  when  YFX2  =1.0 
Yr  = 240  when  YFX2  = -1.0 
Xr  = 16  when  YFX2  = -1.0 
Xr  = 240  when  XFX2  =1.0 

Using  this  information,  two  equations  in  KAFX2  and  KBFX2  are  solved  simultane- 
ously to  obtain 

KAFX2  = -112.0  and  KBFX2  = 128.0 
and  two  equations  in  KCFX2  and  KDFX2  are  solved  to  obtain 
KCFX2  = +112.0  and  KDFX2  = 128.0 


The  symbol  select  code  XYn  is  as  follows: 
n Symbol 

0 Male  Symbol 

1 Female  Symbol 

2 Large  Cross 

3 Small  Cross 

4 Large  Circle 

5 Small  Circle 

6 Small  Solid  Circle 

7 Down  Pointer 

8 Up  Pointer 

9 Diamond 

10  Large  Segmented  Circle 

11  Large  Square 

12  Attitude  Reference  Mark 

6.  SUMMARY  OF  EXECUTION  TIMES  AND  MEMORY  REQUIREMENTS  FOR  THE  DSG  SUBROUTINES 


To  enable  a user  to  estimate  the  memory  requirements  and  execution  time 
for  a particular  symbol  set,  the  following  table  contains  a summary  of  this  in- 
formation for  each  of  the  subroutines  and  the  SYMGEN  routine.  Some  of  the 
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execution  times  for  the  individual  symbol  types  may  vary,  depending  on  the 
symbol's  size.  For  example,  a short  vertical  bar  will  take  less  execution 
time  than  a long  bar.  For  these  cases,  a range  is  specified. 


Routine 

Memory  Requirement 
(Full  Words) 

Execution  Time 
(ma) 

SYMGEN 

471 

1 

ATLINE 

297 

6 

VECTOR 

240 

2-6 

AIRSPD 

365 

2 

COMPASS 

465 

3 

VSCALE 

50 

.25 

HSCALE 

60 

.75 

VBAR 

70 

.1-1 

VDOF 

110 

.25 

XYDOF 

360 

1 

DROUT 

200 

1-2 
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DIGITAL  SYMBOLOGY  GENERATOR 


COMPUTER  LISTINGS 


This  appendix  contains  the  SKC-2000  airborne  computer  assembly 
instruction  mnemonics  (Table  Al)  and  the  complete  SKC-2000  computer 
for  the  routines  described  in  this  report. 
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PI 

DEC 

3.1415937  • PI 

131 

09496 

38098 

40r 487EB 

PI0V3 

DEC 

1 . 570796  - (PI/3) 

133 

09498 

38040 

4064R7ED 

PI0V4 

DEC 

O 7853983  • 'PI/4) 

133 

0949A 

38043 

TANFNC 

BSS 

p 

134 

0949C 

98044 

GLBPTN 

ns  s 

g 

1 35 

* 

136 

137 

* SVMGEN  - 

MAIN  ROUTINE  FOP  GENERATION  OF  SYMBOLS 

138 

* 

139 

07153 

39010 

ORG 

SVMGFN 

140 

07153 

39010 

040071 A6 

FTP 

RTAMN 

141 

07154 

39013 

DC01718E 

STAPT 

STS 

OOVS  SAVE  THE  STATUS  BEO  . HEMOBV  INTRPTS  SHOULD  BE  ENABLFD 

1 43 

07156 

39014 

30007190 

STA 

SAVA  SAVE  THE  A REG 

143 

07158 

39016 

7C007193 

STB 

SAVB  SAVE  THE  B REG 

144 

0715A 

39018 

10007194 

STX 

0 . SAVX  SAVE  THE  INDEX  REG  USED  BV  THE  SVMGEN 

ROUTINES 

145 

0715C 

39030 

1C307196 

5TX 

4 , SAVX*2 

146 

0715E 

39033 

1 C 307 1 98 

STX 

6 , SAVX  * 4 

147 

07160 

39034 

104071 9A 

STX 

8. SAVX*6 

148 

07163 

39036 

10487190 

STX 

9 , SAVX*  8 

149 

07164 

39038 

1C60719E 

STX 

12, SAVXf 10 

150 

07166 

39030 

1C6871A0 

STX 

1 3, SAVX*12 

151 

07168 

39033 

1 C 1 87 1 A3 

STX 

3 . SAVXf 1 4 

153 

0716A 

39034 

1C5071A4 

STX 

10 . SAVX* 1 6 

159 

0716C 

39036 

64307346 

STRT0 

JQU 

STRT1 

154 

0716E 

29038 

9C01718E 

RETURN 

LDS 

SAVS  RESTORE  THE  STATUS  REG 

155 

07170 

29040 

502071 A6 

LDX 

4 .RTAMN 

156 

07173 

29043 

6C330O03 

IMP 

4 , 2,  M 

157 

07174 

39044 

1C3071A 6 

STX 

4 . RTAMN 

158 

07176 

39046 

1 4007190 

LDA 

SAVA  RESTORE  THE  A REG 

159 

07178 

89048 

54007193 

LDB 

SAVB  RESTORE  THE  B REG 

160 

0717A 

39050 

50007194 

LDX 

0 , SAVX  RESTORE  THE  INDEX  REG  USED  BV  THE  SVMGEN  ROUTINES 

161 

0717C 

39053 

SC307196 

LDX 

4 , SAVX  *3 

163 

0717E 

39054 

5C307198 

LDX 

6, SAVX* 4 

163 

07180 

39056 

5C40719A 

LDX 

8.SAVX+6 

164 

07183 

29058 

50 4871 90 

LDX 

9 , SAVX ♦ 8 

165 

07184 

29060 

5C60719E 

LDX 

13. SAVX* 10 

166 

0718b 

39063 

5C6871A0 

LDX 

13, SAVX*13 

167 

07188 

39064 

5C1871A3 

LDX 

3, 5AVX  *14 

168 

0718A 

39066 

5C5071A4 

LDX 

10. SAVX*16 

169 

0718C 

39068 

740071 A6 

RTA 

RTAMN  RETURN  TO  THE  MAIN  PROGRAM 

170 

* 

171 

* STORAGE  FOR  SAVING  THE  REGISTERS 

173 

0718E 

39070 

5AVS 

BSS 

3 

173 

07190 

29073 

SAVA 

B5S 

3 

174 

07193 

39074 

SAVB 

BSS 

2 

175 

07194 

29076 

SAVX 

BSS 

18 

176 

071A6 

29094 

00009CEC 

RTAMN 

HEX 

9CFC  SUBROUTINE  RETURN  ADDRESS 

177 

* 

178 

1 SVMBOL  DRIVE  INPUT  STORAGE  AND  ARGUMENT  LISTS 

179 

* 

180 

t ATLINE  ARGUMENT  LIST 

181 

071  AP 

29036 

3ECCC0CC 

FI 

DEC 

03  COMMANDED  ROLL  ANGLE  - RADIANS 

183 

071 A A 

29098 

BF 199999 

TM 

DEO 

0 2 COMMANDED  PITCH  ANGLE  RADIANS 

18  1 

* VECTOR  ARGUMENT  LIST 

184 

071  Ar 

29100 

00000000 

XI 

DEC 

00  BASE  POINT  X COMMAND 

185 

071  At 

29103 

00000000 

VI 

DEC 

0 0 BASF  POINT  V COMMAND 

I 86 

071 

391  04 

40600O00 

X2 

DEC 

A 75  END  POINT  X COMMAND 

187 

07103 

<f  ' 00O00 

V2 

DEC 

0 25  END  POINT  V COMMAND 

188 

• 7104 

29108 

43C00000 

MoROiN 

DF.C 

16  0 WIDTH  OF  OUTER  BOUNDARY 

189 

♦ VSCALf  NO 

« ftHi'.UHEHT  LIST 

190 

07186 

291  10 

00000000 

HP'»S0 

DEC 

0 SCALE  POSITION 

191 

0 71  DP 

m is 

00000080 

VSOLOB 

DF» 

1 28  SCALE  CENTER  - PASTER  LINE  NO. 

193 

071  BA 

291  14 

00000018 

VSPC0 

DEC 

24  NO  Or  PASTER  LINES  BETWEEN  MARKS 

193 

071BC 

291  16 

0000000B 

VMPKSO 

DF.C 

8 NO  OF  SCALE  MARKS  - EXCLUDING  CENTER 

MARK 

FOCAP-S  VIA  (n  PAGE  « 
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194 

* V5CALF  NO. 

1 ARGUMENT  LIST 

19S 

071BF 

291  tR 

00O00007 

MP051 

DEC 

7 

SCALE  POSITION 

1 96 

071C0 

29120 

000000R0 

VSrLCl 

DEC 

128 

SCALT  CENTER  RASTER  L I NE  NO. 

197 

071C2 

29122 

00000008 

VSPC  1 

DFC 

8 

NO.  OF  RASTER  LINES  BETUEFN  MARKS 

198 

0 7 1 C 4 

29124 

000000  IP. 

VMPKS1 

DEC 

24 

NO  OF  SCALE  MAf'KS  - EXCLUDING  CENTER  MARK 

199 

• H6CALF  NO. 

0 ABGUMT  NT  LIST 

200 

071C6 

29126 

000000E0 

VPOS0 

DEC 

224 

VERTICAL  POSITION  - RASTER  LINE  NO 

201 

071C8 

£9128 

0000000  3 

HSTPT0 

DFC 

3 

STARTING  UOPD  COLUMN  NO  OF  SCALE 

eea 

071CA 

29130 

0000000,? 

HM5K0 

DFC 

P 

NO.  OF  DIVISIONS  / UORD  COLUMN 

201 

07  ICC 

29132 

00000002 

H6 1 ZE 0 

DEC 

2 

UIDTH  OF  SCALE  IN  UORD  COLUMNS 

20  4 

t HSCALF  NO. 

1 APGUME NT  LIST 

205 

071CE 

29134 

00000020 

VP0S1 

DEC 

32 

VERTICAL  POSITION  - RASTER  LINE  NO. 

206 

071  D0 

29136 

00000003 

H5TPT 1 

DEC 

3 

STARTING  UORD  COLUMN  NO.  OF  SCALE 

207 

07  IDS 

291  38 

00000002 

HM5K1 

DEC 

2 

NO.  OF  DIVISIONS  / UORD  COLUMN 

208 

0 ? 1 D 4 

291  40 

00000002 

HSIZEl 

DEC 

2 

UIDTH  OF  SCALE  IN  UORD  COLUMNS 

209 

* VBAR 

NO 

0 

ARGUMENT 

LIST 

210 

071D6 

291  42 

3FD56 326 

VBAR0 

DFO 

0.3333 

COMMANDED  BAP  LENGTH 

21  1 

071  D8 

29144 

C 4200000 

K APAR0 

DE  C 

192.0 

SCALING  PARAMETER 

212 

07  IDA 

29146 

44/00000 

KbUAR0 

DEC 

224 . 0 

SCALING  PARAMETER 

21  1 

071  DC 

29148 

00000000 

NPVP0 

DFC 

0 

HORIZONTAL  PAR  POSITION  - UORD  COLUMN  1 

214 

071  DE 

29150 

00000002 

BAR3L0 

DEC 

2 

BAR  POSITION  U I THIN  THE  UORD  COLUMN 

215 

07  1 f 0 

29152 

4 00*00000 

VBUL0 

DEC 

1 0 

BAR  MAXIMUM  COMMAND  LIMIT 

216 

07 1 E 2 

29154 

0000OAO0 

VBLL0 

DEC 

0 . 0 

BAP  LOUER  COMMAND  LIMIT 

217 

* VBAR 

NO  . 

1 

ARGUMENT 

LIST 

218 

071  F 4 

29156 

BFAAACD9 

VBAP1 

DEC 

0 3333 

1 COMMANDED  BAP  LENGTH 

219 

071E6 

29158 

C3AO0000 

KABAR1 

DEC 

96.0 

SCALING  PARAMETER 

220 

071E8 

29160 

444O0OO0 

K811AR 1 

DEC 

128 . 0 

SCALING  PARAMETER 

221 

07  1 E A 

29162 

00000000 

HPVB1 

DEC 

0 

HORIZONTAL  BAR  POSITION  - UORD  COLUMN 

222 

071  EC 

29164 

00000000 

BARSL1 

DEC 

0 

BAR  POSITION  U I THIN  THE  UORD  COLUMN 

223 

071EF 

29166 

40000000 

VBUL1 

DEC 

1 0 

BAP  MAXIMUM  COMMAND  LIMIT 

224 

071T0 

29168 

C 0000000 

VBL.L1 

DEO 

1.0 

BAP  LOUER  COMMAND  LIMIT 

225 

t vdof 

NO 

0 

ARGUMENT 

LIST 

226 

071F2 

29170 

3r-  e 60666 

vooro 

DEC 

0 1 

COMMANDED  SYMBOL  POSITION 

227 

071 F 4 

29172 

04200000 

KAVDO 

DEC 

192.0 

SCALING  PARAMETER 

228 

071E6 

29174 

44700000 

KBVDO 

DEC 

224 . 0 

SCALING  PARAMETER 

229 

071FR 

29176 

0O000000 

HPVD0 

DEC 

0 

HORIZONTAL  SYMBOL  POSITION  - UORD  COLUMN 

NO  . 

230 

07  1 F A 

29178 

0000000 1 

VDSFL0 

DFC 

1 

SYMBOL  SELECT  CODE  - RT  POINTING  INDICATOR 

231 

071FO 

29180 

4OC000O0 

VDUL0 

DEC 

l 0 

SYMBOL  MAXIMUM  COMMAND  LIMIT 

232 

071  EE 

29182 

00000000 

VDLL0 

DFC 

0 0 

SYMBOL  LOUER  COMMAND  LIMIT 

233 

* VDOF 

NO 

1 

ARGUMENT 

LIST 

234 

07200 

291  R4 

404OOCCC 

VDOF  1 

DFC 

0 6 

COMMANDED  SYMBOL  POSITION 

235 

07202 

29186 

C 1A00000 

K AVD1 

DFC 

96.0 

SCALING  PARAMt  rtR 

236 

07204 

29183 

44400000 

KBVD1 

DE  0 

128  0 

SCALING  PARAMETER 

237 

07206 

29190 

0000O0O0 

Hf'VM 

DEC 

0 

HORIZONTAL  SYMBOL  POSITION  - UORD  COLUMN 

HO. 

238 

07208 

29  192 

0000OO00 

VDSEL1 

DEC 

0 

SYMBOL  SELECT  CODE  LEFT  POINTING  INDICATOR 

839 

0720A 

29194 

40000000 

VDUL1 

DFC 

1 0 

SYMBOL  MAXIMUM  COMMAND  LIMIT 

240 

0720 C 

29196 

C000O000 

VDLL1 

DEC 

1 0 

SYMBOL  LOUER  COMMAND  LIMIT 

241 

t A I R5PF  F D 

ARGUMENT  LIST 

242 

0720F 

29198 

00000O00 

A5PD 

DEO 

0 0 

AIRSPEED  INPUT  COMMAND 

243 

07210 

29200 

0000006 1 

DFC 

97 

244 

07212 

29202 

0000080F 

DEC 

2062 

245 

07214 

2920  4 

0000O4F  E 

DEC 

1278 

246 

07216 

29206 

00000000 

HEX 

0 

e47 

072  IR 

29208 

00000000 

HEX 

0 

248 

0721  A 

29210 

00000000 

HEX 

0 

249 

* VDOF 

NO 

3 

argument 

LIST 

250 

0721C 

29212 

3F D55  126 

VDOF  3 

DEC 

0 . 3333 

COMMANDED  SYMBOL  POSITION 

251 

072 1 F 

2921  4 

r 42000O0 

Y AVD3 

DFC 

192.0 

SCALING  PARAMETER 

252 

07220 

29216 

4 4 700000 

y BVD  3 

DEC 

224  0 

SCALING  PARAMETER 

263 

07322 

29218 

00000007 

HPVD3 

DEC 

7 

HORIZONTAL  SYMBOL  POSITION  - UORD  COLUMN 

NO. 

254 

07224 

29220 

00000001 

VD5EL3 

DEC 

1 

SYMBOL  SELECT  CODE  - RT  POINTING  INDICATOR 

255 

07226 

29222 

40000000 

VDNL3 

DEC 

1 0 

SYMBOL  MAXIMUM  COMMAND  LIMIT 

256 

0722R 

29224 

00000000 

VDI.L3 

DFC 

-1 .0 

SYMBOL  LOUER  COMMAND  LIMIT 

257 

t VDOF 

NO 

4 

argument 

LIST 

250 

0722A 

29226 

00000000 

VDOF  4 

DEC 

O.0 

COMMANDED  SYMBOL  POSITION 

259 

0722C 

29228 

C 4200000 

KAVP4 

DEC 

-192.0 

SCALING  PARAMETER 

260 

0722E 

29230 

44/00000 

KBVD4 

DEC 

224 . 0 

SCALING  PARAMETER 

261 

07230 

2923P 

00000000 

HPVD4 

DEC 

0 

HORIZONTAL  SYMBOL  POSITION  - UORD  COLUMN 

MO. 

262 

07232 

,■  -.  ... 

00000002 

VDSEL4 

DEC 

a 

SYMBOL  SELECT  CODE  - LEFT  SIDE  REFERENCE 

MARK 

263 

07234 

292  16 

40C00000 

VDUL4 

DEC 

1 0 

SYMBOL  MAXIMUM  COMMAND  LIMIT 

264 

07236 

29238 

00000000 

VDLL4 

DEC 

-1 .0 

SYMBOL  LOWER  COMMAND  LIMIT 

265 

* VDOF 

NO 

5 

ARGUMENT 

LIST 

42 
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266 

07238 

29240 

00000000 

VDOFS 

DEC 

0 . 0 

267 

0723A 

29242 

C3A00000 

KAVD5 

DEC 

-96 . 0 

268 

0723C 

29244 

44400000 

K3VD5 

PEC 

128.0 

269 

0723E 

29246 

00000000 

HPVDS 

DEC 

0 

27® 

07240 

29248 

00000003 

VD5EL5 

DEC 

3 

271 

07242 

292S0 

40C000O0 

VDULS 

DEC 

1 0 

272 

07244 

29252 

00000000 

VDLLS 

DEC 

-1.0 

273 

* VDOF 

NO. 

6 ARGUMCNT  l 

27  4 

07246 

29254 

00000000 

YD0F6 

DFC 

0 . 0 

275 

07248 

29256 

00000000 

KAVD6 

DEC 

0 . 0 

276 

0724  A 

29258 

44700000 

KBVD6 

DEC 

224 . 0 

277 

0724C 

29260 

0000O007 

HPVD6 

DEC 

7 

278 

0724F. 

29262 

00000004 

VP5E.L6 

DEC 

4 

279 

07250 

29264 

40C00000 

VDUL6 

DEC 

1 0 

28  A 

07252 

29266 

C0000000 

VPLL6 

DEC 

1.0 

281 

* VDOF 

NO. 

7 ARGUMENT  l 

282 

07254 

29268 

00000000 

VDOF  7 

DEC 

0 . 0 

283 

07256 

29270 

00000000 

KAVD7 

DFC 

0 . 0 

284 

072S8 

29272 

44700000 

KBVD7 

DEC 

224 . 0 

285 

072SA 

29274 

00000007 

HPVD7 

DEC 

7 

286 

072SC 

29276 

0000000S 

VDSF.L7 

DEC 

•3 

287 

0725E 

*2 

40600000 

VDUL7 

DEC 

1 . O 

288 

07260 

P.92R0 

00000000 

VPLL7 

PEC 

-1 . 0 

289 

t VDOF 

NO 

8 ARGUMENT  L 

290 

07262 

29282 

00000000 

VDOF  8 

DFC 

0 . 0 

291 

07264 

29284 

00000000 

KAVD8 

DFC 

0 0 

292 

07266 

29286 

44700000 

KBVD8 

DFC 

224 .0 

293 

07268 

29^88 

00000007 

HP  V DP 

DEC 

7 

294 

0726A 

29290 

00000006 

VDSEL8 

DEC 

6 

295 

0726C 

29292 

4 ©C 00000 

VDULS 

DEC 

1 . 0 

296 

0726E 

29294 

C0000000 

VDLL8 

DEC 

-1  0 

297 

* VDOF 

NO. 

9 ARGUMENT  l 

298 

07270 

29296 

00000000 

VDOF  9 

DEC 

0 . 0 

299 

07272 

29298 

00000000 

KAVD9 

DFC 

0 . 0 

300 

07274 

29300 

44700000 

KBVD9 

DFC 

224 . 0 

301 

07276 

29102 

00000007 

HPVD9 

DEC 

7 

302 

07278 

29304 

00000007 

VDSEL9 

DEC 

7 

303 

0727A 

29306 

40C0O000 

VDUL9 

DEC 

1 0 

304 

0727C 

29308 

C0000000 

VDLL9 

DFC 

-1 . 0 

30S 

* XYDOF 

■ NO. 

0 ARGUMENT 

306 

0727E 

29310 

40400000 

XFX0 

Dl  C 

0.5 

307 

07280 

29312 

BFR00000 

VFX0 

DEC 

-0  S 

308 

07282 

2931  4 

C3900000 

KAEX0 

DEC 

-112.0 

309 

07284 

29316 

44400000 

KBFX0 

DEC 

128.0 

310 

07286 

29318 

43F 00000 

KCFX0 

DEC 

112.0 

31 1 

07288 

29320 

44400000 

KDFX0 

DEC 

128  0 

312 

0728A 

29  ».  V 

0000000B 

xvo 

DEC 

1 1 

313 

* XYDOF 

NO 

. 1 ARGUMENT 

314 

0728C 

29324 

00000000 

xr  xi 

DEC 

0.0 

315 

0728E 

29326 

00000000 

VFXl 

DFC 

0 0 

316 

07290 

29328 

00000000 

KAFXl 

DFC 

0 0 

317 

07292 

29130 

43440000 

K.  BF  X 1 

DEC 

34  0 

318 

07294 

29332 

43E00000 

KCFX1 

DEC 

96  0 

319 

07296 

29334 

44400000 

KDFX1 

DEC 

128 . 0 

320 

07298 

29336 

00000008 

xvt 

DEC 

8 

321 

* XYDOF  NO 

2 ARGUMENT 

322 

0729A 

29338 

BE  800000 

XFX2 

DEC 

-0.5 

323 

0729C 

29340 

40666666 

VFX2 

PEC 

0.8 

324 

0729E 

29342 

C3900000 

K Ar  X2 

PFC 

-112.0 

32S 

072A0 

29344 

44400O00 

KBFX2 

PEC 

1 28 . 0 

326 

072A2 

29346 

43F00000 

KCFX2 

DEC 

1 12  © 

327 

072A4 

29348 

44400000 

KDFX2 

pro 

188  0 

328 

072A6 

2935«d 

00000002 

XY2 

DEC 

2 

329 

% XYDOF  NO 

. 3 ARGUMENT 

330 

072AP 

29352 

C0 1 09999 

XFX3 

PFC 

-0  8 

331 

072AA 

2936  4 

40400000 

YFX3 

pro 

0 . 5 

332 

072AC 

29366 

C *900000 

KAf  X3 

DEC 

-112  0 

333 

972AE 

29368 

44400000 

KBFX3 

Drc 

i ar  © 

334 

• 72BA 

89360 

4 3F 00000 

KCFX3 

PFC 

112  0 

336 

072B2 

29  Ml 

44400000 

KDTX3 

DEC 

128  0 

336 

072B4 

29364 

00000003 

XV3 

DEC 

3 

337 

* XYDOF  NA 

4 ARGUMENT 

COMMANDED  SYMBOL  POSITION 
SCALING  PARAMETER 
SCALING  PARAMETER 

HORIZONTAL  SYMBOL  POSITION  - UORD  COLUMN  NO. 

SYMBOL  SELECT  CODE  RIGHT  SIDE  REFERENCE  MARK 
SYMBOL  MAXIMUM  ( OMMAND  LIMIT 
SYMBOL  LOUER  COMMAND  LIMIT 
LIST 

COMMANDED  SYMBOL  POSITION 
SCALING  PARAMETER 
SCALING  PARAMETER 

HORIZONTAL  SYMBOL  POSITION  - UORD  COLUMN  NO. 

SYMBOL  SELECT  CODE  - FUD  ALPHA  CHAR 
SYMBOL  MAXIMUM  COMMAND  LIMIT 
SYMBOL  LOUER  COMMAND  LIMIT 
LIST 

COMMANDED  SYMBOL  POSITION 
SCALING  PARAMETER 
SCALING  PARAMETER 

HORIZONTAL  SYMBOL  POSITION  - UORD  COLUMN  NO. 

SYMBOL  SELECT  CODE  - NOE  ALPHA  CHAR 
SYMBOL  MAXIMUM  COMMAND  LIMIT 
SYMBOL  LOUER  COMMAND  LIMIT 
LIST 

COMMANDF  D SYMBOL  POSITION 
SCALING  PARAMETER 
SCALING  PARAMETER 

HORIZONTAL  SYMBOL  POSITION  - UORD  COLUMN  NO. 

SYMBOL  SELECT  CODE  - HOV  ALPHA  CHAP 
SYMBOL  MAXIMUM  COMMAND  LIMIT 
SYMBOL  LOUER  COMMAND  LIMIT 
LIST 

COMMANDED  SYMBOL  POSITION 
SCALING  PARAMETER 
SCALING  PARAMETER 

HORIZONTAL  SYMBOL  POSITION  - UORD  COLUMN  NO. 

SYMBOL  SELECT  CODE  - BOB  ALPHA  CHAR 
SYMBOL  MAXIMUM  COMMAND  LIMIT 
SYMBOL  LOUER  COMMAND  LIMIT 
LIST 

COMMANDED  HORIZONTAL  SYMBOL  POSITION 

COMMANDED  VERTICAL  SYMBOL  POSITION 
SCALING  PARAMETER 
SCALING  PARAMETER 
SCALING  PARAMETER 
SCALING  PARAMETER 
SYMBOL  SELECT  CODE  - LARGE  BOX 
LIST 

COMMANDED  HORIZONTAL  SYMBOL  POSITION 
COMMANDED  VERTICAL  SYMBOL  POSITION 
SCALING  PARAMETER 
SCALING  PARAMETER 
SCALING  PARAMETER 
SCALING  PARAMETER 

SYMBOL  SELECT  CODE  - HEADING  REF  SYMBOL  (UP  POINTER) 
LIST 

COMMANDED  HORIZONTAL  SYMBOL  POSITION 
COMMANDED  VERTICAL  SYMBOL  POSITION 
SCALING  PARAMETER 
SCALING  PARAMETER 
SCALING  PARAMETER 
SCALING  PARAMETER 
SYMBOL  SELECT  CODE  - LARGE  CROSS 
LIST 

COMMANDED  HORIZONTAL  SYMBOL  POSITION 
COMMANDED  VERTICAL  SYMBOL  POSITION 
SCALING  PARAMETER 
SCALING  PARAMETER 
SCALING  PARAMETER 
SCALING  PARAMETER 
SYMBOL  SELECT  CODE  - SMALL  CROSS 
LIST 
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LI 

NF  ABS 

ODnPFS?  tNSTCODE  SOURCE 

statement 

338 

072B6 

29366 

00000000 

XFX4 

DEC 

O 0 

COMMANDED  HORIZONTAL  SYMBOL  POSITION 

339 

072B8 

29368 

00000000 

VFX4 

DEC 

0 . 0 

COMMANDED  VERTICAL  SYMBOL  POSITION 

340 

072BA 

29370 

C 3900000 

KAF  X4 

DEC 

112.0 

SCALING  PARAMETER 

341 

073BC 

29372 

44400000 

KBFX4 

DEC 

128.0 

SCALING  PARAMETER 

342 

072BE 

29374 

43FO00OO 

KCFX4 

DEC 

112.0 

SCALING  PARAMETER 

343 

072C0 

29376 

44400000 

KDFX4 

DEC 

128  0 

SCALING  PARAMETER 

344 

072C2 

29373 

00000004 

XY4 

DEC 

4 

SVMROL  SELECT  CODE  - LARGE  CIRCLE 

345 

* XVDOF  NO 

. 5 

ARGUMENT 

LIST 

346 

072C4 

29330 

40600000 

XFX5 

DEC 

0 75 

COMMANDED  HORIZONTAL  SYMBOL  POSITION 

34? 

07206 

29382 

40400000 

VFX5 

DEC 

0 . 5 

COMMANDED  VERTICAL  SYMBOL  POSITION 

348 

07208 

29384 

O990OOO0 

KAFX5 

DEC 

-112.0 

SCALING  PAPAMETEP 

349 

©72CA 

29386 

44400000 

KBFXS 

DEC 

128 . 0 

SCALING  PARAMETER 

350 

07200 

29388 

43F  00000 

KCFX5 

DEC 

112.0 

SCALING  PARAMETER 

351 

072OE 

293*^0 

44400000 

KDFX5 

DEC 

128.0 

SCALING  PARAMETER 

352 

072D0 

29392 

00000005 

XV5 

DEC 

5 

SYMBOL  SELECT  CODE  - SMALL  CIRCLE 

353 

* XVDOF 

HO 

6 

ARGUMENT 

LIST 

3S4 

072D2 

29394 

00000000 

XFX6 

DEC 

0 . 0 

COMMANDED  HORIZONTAL  SYMBOL  POSITION 

355 

072D4 

29  396 

000000-0O 

VFX6 

DEC 

0 . 0 

COMMANDED  VERTICAL  SYMBOL  POSITION 

356 

072D6 

29  393 

00000000 

KAFX6 

DEC 

0 0 

SCALING  PARAMETER 

35? 

072D8 

29400 

44700000 

KBFX6 

DEC 

224.0 

SCALING  PARAMETER  . - 

358 

072DA 

29402 

00000000 

KCFX6 

DEC 

0 . 0 

SC AL I NG  PARAMETER 

359 

072DC 

29404 

446E0O00 

KDFX6 

DEC 

220  0 

SC  AL  INC  "PARAME  ter 

360 

072DE 

29406 

00000006 

XV6 

DEC 

6 

SVMROL  SELECT  CODE  - SMALL  SOLID  CIRCLE 

361 

* XVDOF 

NO  . 

7 

APOtTrlFNT 

LIST 

O72E0 

.29408 

00000000 

XI  x? 

0 . 0 

COMMANDED  HORIZONTAL  SYMBOL  POSITION 

U ' 

072E2 

294  1 O 

0O0000O0 

vr  - 

DEC 

O . 0 

COMMANDED  VERTICAL  SYMBOL  POSITION 

364 

072E4 

29412  00^-0^00 

Y AFX7 

DEC 

0 . 0 

SCALING  PARAMETER 

365 

072E6^- 

4 

43440000 

KBFX7 

DEC 

34  0 

SCALING  PARAMETER 

39416 

4 3E  00000 

KCF  X7 

DEC 

96  0 

SCALING  PARAMETER 

36? 

072EA 

29418 

44400000 

KDT  X7 

DEC 

128  0 

SCALING  PARAMETER 

368 

072EC 

29420 

O0O00O08 

XV7 

DEC 

8 

SYMBOL  SELECT  CODE  - UP  POINTER 

369 

» XVDOF 

NO  . 

8 

ARGUMENT 

LIST 

370 

072FF 

29422 

0000OO00 

XFX8 

DEC 

0 . 0 

COMMANDED  HORIZONTAL  SYMBOL  POSITION 

371 

072F0 

29424 

00000000 

VFX8 

DEC 

0.0 

COMMANDED  VERTICAL  SYMBOL  POSITION 

372 

072F2 

29426 

0OO0OO00 

KAFX8 

DEC 

0.0 

SCALING  PARAMETER 

3?3 

072F4 

29428 

44400000 

K.BFX8 

DEC 

128.0 

SCALING  PARAMETER 

374 

072F6 

29430 

00000000 

KCFX8 

DEC 

0 . 0 

SCALING  PARAMETER 

375 

072F8 

29432 

44400000 

KDFX8 

DEC 

128.0 

SCALING  PARAMETER 

376 

072FA 

294  34 

00OO000C 

XV8 

DEC 

12 

SYMBOL  SELECT  CODE  - ATTITUDE  REF  MARK 

377 

* XVDOF 

NO 

. 9 

ARGUMENT 

LIST 

378 

072FC 

294  36 

BF  A0O0O0 

XFX9 

DFC 

-0 . 375 

COMMANDED  HORIZONTAL  SYMBOL  POSITION 

379 

072FE 

294  38 

0O000O00 

VFX9 

DEC 

0 . 0 

COMMANDED  VERTICAL  SYMBOL  POSITION 

380 

07300 

29440 

00000000 

KAFX9 

DEC 

0 0 

SCALING  PARAMETER 

381 

07302 

29442 

44700000 

Y BTX9 

DEC 

224  0 

SCALING  PAPAMETEP 

382 

07304 

29444 

43400000 

KCF  X9 

DEC 

32  0 

SCALING  PARAMETER 

383 

07306 

39446 

44400000 

KDFX9 

DEC 

128  0 

SCALING  PARAMETER 

384 

07308 

29448 

00000009 

XV9 

DFC 

9 

SYMBOL  SELECT  COPE  - DIAMOND 

386 

* XVDOF 

■ NO 

10 

ARGUMENT 

LIST 

386 

0730A 

29450 

O0O0OOO0 

XFX10 

DEC 

0 . 0 

COMMANDED  HORIZONTAL  SYMBOL  POSITION 

387 

0730C 

29452 

40400000 

VFX10 

DEC 

0 5 

COMMANDED  VERTICAL  SYMBOL  POSITION 

388 

0730F 

29454 

C 3900000 

KAFX10 

DEC 

112.0 

SCALING  PAPAMETEP 

389 

07310 

29466 

444OOO0O 

KBrxie 

DFC 

128.0 

SCALING  PARAMETFP 

390 

07312 

29468 

43FOOO0O 

KCFX10 

DEC 

112.0 

SCALING  PAPAMETEP 

391 

0731  4 

39460 

44400000 

K DF  X 1 0 

DEC 

128.0 

SCALING  PAPAMFTEP 

392 

07316 

29462 

0OOOO0OA 

XV10 

DEC 

10 

SYMBOL  SELECT  CODE  - BROKEN  CIRCLE 

1 1 1 

* XVDOF  NO 

. 1 1 

APGUMFNT 

LIST 

394 

07318 

29464 

00OO0OO0 

XFX1  1 

DEC 

0 0 

COMMANDED  HORIZONTAL  SYMBOL  POSITION 

395 

0731 A 

29466 

00000000 

VFXl  1 

DEC 

0 . 0 

COMMANDED  VERTICAL  SYMBOL  POSITION 

396 

0731 C 

29468 

C 3900000 

KAFX1 1 

DEC 

-112.0 

SCALING  PARAMETER 

397 

0731 E 

29470 

4440O0O0 

KBFX1 1 

DEC 

128.0 

SCALING  PARAMETER 

398 

07320 

29472 

43F 00000 

KCF  XI 1 

DEC 

112  0 

SCALING  PARAMETER 

399 

07322 

29474 

4440OO00 

KDFX1 1 

DEC 

128 . 0 

SCALING  PARAMETER 

400 

07324 

29476 

0000O00 B 

XVI  1 

DEC 

1 1 

SYMBOL  SELECT  CODE  - BOX 

401 

* XVDOF  NO 

. 12 

ARGUMENT 

LIST 

402 

07326 

29478 

00000000 

XFX12 

DEC 

0 0 

COMMANDED  HORIZONTAL  SYMBOL  POSITION 

403 

07328 

29480 

00000O00 

VFX12 

DEC 

0.0 

commanded  vertical  symbol  position 

404 

0732A 

29483 

00000O00 

KAFX12 

DEC 

0 0 

SCALING  PARAMETER 

405 

07320 

29484 

44700000 

KBF'Xl  2 

DEC 

224 . 0 

SCALING  PAPAMETEP 

406 

0732F 

29486 

43E  00O00 

KCFX12 

DEC 

96 . 0 

SCALING  PARAMETER 

407 

07330 

29488 

444O0O00 

KDFX12 

DEC 

128.0 

SCALING  PAPAMETEP 

400 

07332 

29490 

0000O00C 

XV 13 

DEC 

12 

SYMBOL  SELECT  CODE  - SMALL  SOLID  BOX 

44 


FOCAP-S  V10. 

03  PAGE  7 

LINE 

ABS  ADDRESS 

IN5TC0DE 

SOURCE^ 

.P-TiTYE  ment 

— " 

409 

* COMPASS  ARGUMENT  LIST 

410 

07334 

294 gj& 

etf&AOAOO 

HDG 

DEC 

0 0 

compass  input- Command 

411 

* DRDOUT  NO.  0 

ARGUMENT 

LIST 

41. 3. 

-07336 

29494 

44C38000 

DOTIN0 

DEC 

270.0 

COMMANDED  INPUT  DECIMAL  NUMBER 

413 

07338 

29496 

00000003 

NMB00 

DEC 

3 

NUMBER  OF  ZEtfOS  DISPLAYED  FOR  A 

414 

0733A 

2^498 

00000010 

5TLN0 

DEC 

16 

STARTING  RASTER  LINE  NUMBER 

4 IS 

0733C 

29500 

00000008 

STUC0 

DEC 

8 

STARTING  UOPD  COLUMN  NUMBER 

416 

0733E 

29502 

00000000 

TITLE® 

DEC 

0 

TITLE  OE  DECIMAL  READOUT  --  HDG 

417 

* 

418 

* LOCAL 

. VARIABLES  E OR  THIS  SUBROUTINE 

419 

07340 

29504 

00000000 

SVMSEL 

DEC 

0 

420 

07342 

29506 

643O0000 

JGUINS 

HEX 

64300000 

JUMP  GLOBAL  OPCODE 

421 

07344 

29508 

LOCRTM 

BSS 

2 

422 

* 

423 

4 THIS 

ROUTINE 

PERFORMS 

ONE  TIME  COMPUTATIONS  AND  SETS  ( 

424 

4 THIS  SECTION  TO  BE 

SKIPPED  ON  SUBSEQUENT  PASSES 

42S 

07346 

29510 

6404749A 

STRT1 

JS 

TRGTBL 

GENERATE  THE  TRIG  TABLES 

426 

0734P 

29512 

34007350 

LAE 

STRT2 

427 

0734  A 

29514 

A4007342 

ADU 

JQUINS 

428 

0734C 

29516 

3C00716C 

sta 

STRT0 

429 

0734E 

29S18 

64307 1 6E 

JGU 

RETURN 

4 30 

* 

431 

X TRANSFER  THE 

SVMBOL  SELECT  ARGUMENT 

432 

* 

433 

07350 

29520 

140471A6 

STRT2 

LDA 

RTAMN , I 

434 

07352 

29522 

3C007340 

sta 

SVMSEL 

435 

* 

4 36 

07354 

29524 

0700 

NOP 

CLEAR  THE  TVRSTR 

ZERO  INPUT 


UP  THE  CODE  TO  ALLOU 


437 

438 


ROUTINE  TO  CALL  THE  SELECTED  SVMBOL  PROGRAMS 


439 

07355 

2952S 

0700 

439 

07356 

29526 

14007340 

LDA 

SVMSEL 

SVMSEL 

SPECIFIES  WHICH  SVMBOl 

440 

07358 

29528 

80009444 

SAM 

BMSK1 

CHECK 

IF 

SVMBOL 

0 

IS 

DESIRED 

441 

0735A 

29530 

6006 

JU 

.*♦6 

441 

0735B 

29531 

0700 

442 

0735C 

29S32 

6404600® 

JS 

ATLINE 

443 

0735E 

29S34 

04007 1 AR 

PTP 

F I 

444 

07360 

29536 

14007340 

LDA 

SVMSEL 

445 

07362 

29538 

8C0O9446 

SAM 

BMSKt+a 

CHECK 

IF 

SVMBOL 

1 

IS 

DESIRED 

446 

07364 

29540 

6006 

JU 

*♦6 

446 

07365 

29541 

0700 

447 

07366 

29S42 

640462S2 

JS 

VECTOR 

448 

07368 

29544 

040071 AC 

PTR 

XI 

449 

0736A 

29546 

1400734® 

LDA 

SVMSEL 

4S0 

0736C 

29548 

8C0094  48 

SAM 

BMSK  1+-4 

CHECK 

IF 

SVMBOL 

2 

IS 

DESIRED 

451 

0736E 

29550 

6006 

JH 

* + 6 

451 

0736F 

2955 1 

0700 

452 

07370 

29552 

64046AAE 

JS 

VSCALE 

453 

07372 

2955  4 

040071 B6 

PTR 

HPOS0 

454 

07374 

29556 

14007340 

LDA 

SVMSEL 

45S 

07376 

29558 

8C00944A 

SAM 

BMSK 1 +6 

CHECK 

IF 

SVMBOL 

3 

IS 

DESIRED 

456 

07378 

29560 

6006 

JU 

t+e 

456 

07379 

29561 

070® 

457 

0737A 

29562 

64046AAE 

JS 

VSCALE 

458 

0737C 

29564 

04007 1 BE 

PTR 

NPOSt 

459 

0737E 

29566 

14007340 

LDA 

SVMSEL 

460 

07380 

29568 

8C00944C 

SAM 

BMSK 1+8 

CHECK 

IF 

SVMBOL 

4 

IS 

DESIRED 

461 

07382 

2957® 

6006 

JU 

t ♦ 6 

461 

07383 

29S71 

0700 

462 

07384 

29572 

64046P12 

JS 

HSCALE 

463 

07386 

29S74 

040071C6 

PTP 

VPOS® 

464 

07388 

29576 

1 4007340 

LDA 

SVMSEL 

465 

0738A 

29578 

8C00944E 

SAM 

BMSKl+t® 

CHECK 

IF 

SVMBOL 

S 

IS 

DESIRED 

466 

0738C 

29580 

6006 

JU 

*♦6 

466 

0738D 

2958! 

0700 

467 

0738E 

29682 

64046B12 

JS 

HSCALE 

468 

07390 

29584 

040071CE 

PTR 

VP0S1 

469 

07392 

29586 

14007340 

LDA 

SVMSEL 

,470 

07394 

29588 

8C009450 

SAM 

BMSK1+1B 

CHECK 

IF 

SVMBOL 

6 

IS 

DFSIRFD 

45 


▼ 


roCAP-s  vie  e,  pace  a 

LINF  ABS  ADDPFSS  JNSTCODf  SOURCE  STATEMENT 


471 

07.196 

29590 

6006 

JU 

471 

07397 

*91  91 

0700 

472 

07  398 

2959 a 

64046R8A 

JS 

473 

07  39A 

29594 

04007 1D6 

PTR 

474 

0739C 

29596 

14007340 

LDA 

47S 

0739E 

29598 

8C0O9452 

5AM 

476 

073A0 

29600 

6006 

JU 

476 

073A1 

29601 

0700 

477 

073A2 

29 602 

64046B8A 

JS 

478 

073A4 

29604 

04007 1 E 4 

PTR 

479 

07JA6 

29606 

14007340 

LDA 

480 

073A8 

29608 

8CO094S4 

SAM 

481 

073AA 

29610 

6006 

JU 

481 

073AB 

2961  1 

0700 

482 

073AC 

29i  i . : 

64046C 16 

JS 

483 

07  3AE 

29614 

04007  IF’ 2 

PTP 

484 

073BO 

29616 

1 4007340 

LDA 

48S 

073B2 

29618 

8C 009456 

SAM 

486 

073P4 

29620 

6006 

JU 

486 

073R5 

29621 

0700 

487 

073B6 

29622 

6404OC16 

JS 

488 

073B8 

29624 

04O072O0 

PTR 

489 

07  38 A 

29626 

14OO7340 

LDA 

490 

073BC 

29628 

8C  009458 

SAM 

491 

073BE 

29630 

6006 

JU 

491 

073BF 

29631 

0700 

492 

073C0 

29632 

640467D4 

JS 

493 

073C2 

296  34 

0400720E 

PTR 

494 

073C4 

29636 

1 4O07340 

LDA 

495 

073C6 

896  18 

8C00945A 

SAM 

496 

073C8 

29640 

6006 

JU 

496 

073C9 

29641 

0700 

497 

073CA 

29642 

64046C1 6 

JS 

498 

073CC 

296  41 

0400721 C 

PTR 

499 

073CE 

29646 

1 4007340 

LDA 

S00 

073D0 

29648 

8LO094SC 

SAM 

S01 

073D2 

29650 

6006 

JU 

501 

073D  1 

29651 

0700 

S02 

073D4 

896!  8 

64046C1 6 

JS 

503 

073D6 

29654 

0 400722A 

PTR 

504 

073D3 

29656 

1 4007340 

LDA 

50S 

073DA 

29658 

8C00945E 

SAM 

506 

073DC 

29660 

6006 

JU 

506 

073DD 

29661 

0700 

S07 

073DE 

29662 

64046C16 

JS 

508 

073E0 

29664 

04007238 

PTR 

S09 

073E2 

29666 

14007340 

LDA 

S10 

073F4 

29668 

8^009460 

SAM 

SI  1 

073F6 

29670 

6006 

JU 

51  1 

07  3F7 

29671 

0700 

512 

073E8 

2'n.  ,V 

64A46C16 

JS 

SI  3 

073EA 

c 96  7 4 

*4007246 

PTR 

51  4 

073EC 

29676 

14OO7340 

LDA 

SIS 

073EE 

29678 

8CO09462 

SAM 

516 

073F0 

29680 

6006 

JU 

516 

073F1 

29681 

0700 

517 

07  jr  2 

29682 

64046C16 

JS 

518 

07  IF  4 

29684 

04007254 

PTR 

519 

07  JF  6 

29686 

1 4007340 

LDA 

520 

07  3F8 

29688 

8C  009464 

SAM 

521 

073FA 

29690 

6006 

JU 

521 

079FB 

29691 

0700 

522 

073FC 

1 N 08 

64046C1 6 

JS 

523 

073FE 

29694 

040O7262 

PTR 

524 

07  400 

29696 

1 4O07340 

LDA 

525 

07402 

29698 

86000466 

6AM 

*♦6 

VBAP 

VBAR0 

SVMSEL 

BMSK1M4  CHECK  IF  SVMBOL  7 IS  DESIRED 
*♦€ 

VBAR 

VBARI 

SVMSEL 

BMSK 1*16  CHECK  IF  SVMBOL  8 IS  DESIRED 
*♦6 

VDOF 

YDOFO 

SVMSEL 

OMSK  1 ♦ 1 8 CHECK  IF  SVMBOL  9 IS  DESIRED 
*♦6 

VDOF 
VDOF  1 
SVMSEL 

BMSKH20  CHECK  IF  SVMBOL  10  IS  DESIRED 
*♦8 

AIRSPO 

ASPD 

SVMSEL 

BMSK 1 *22  CHECK  IF  SVMBOL  11  IS  DESIRED 
*♦6 

VDOF 

VD0F3 

SVMSEL 

BMSK 1*24  CHECK  IF  SVMBOL  12  IS  DESIRED 
*♦6 

VDOF 
VDOF  4 
SVMSEL 

BMSK 1 *26  CHECK  IF  SVMBOL  13  IS  DESIRED 
*♦6 

VDOF 

VD0F5 

SVMSEL 

BMSK 1 *28  CHECK  IF  SVMBOL  14  IS  DESIRED 
*♦6 

VDOF 
VDOF  6 
SVMSEL 

BMSK 1 ♦ 30  CHECK  IF  SVMBOL  15  IS  DE9IRED 
* *6 

VDOF 

VD0F7 

SVMSEL 

PMSK1+32  CHECK  IF  SYMBOL  16  IS  DESIRED 
*♦6 

VDOF 
VDOF  8 
SVMSEL 

PMSK104  CHECK  IF  SVMBOL  17  IS  DESIRED 


' 
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focap-s  vie*. es  pace:  9 

LINE  ABS  ADDRESS  INSTCODE  SOURCE  STATEMENT 


586 

074*4 

29700 

6006 

JU 

* *6 

586 

07  4 05 

8970  1 

0700 

587 

07406 

89708 

64046C 1 6 

JS 

VDOF 

588 

07408 

89704 

*4007870 

PTP 

VD0F9 

589 

0740A 

89706 

1 4007  <40 

l.DA 

SVMSFL 

530 

0740C 

89708 

8C009468 

SAM 

BMSK 1 *36 

531 

0740F 

89710 

6006 

JU 

♦ ♦6 

531 

0740F 

2971  1 

0700 

538 

07410 

89718 

64046CF2 

JS 

XYDOF 

533 

07418 

3971  4 

O4O0787E 

PTR 

XFX0 

534 

07414 

39716 

1 4007340 

LDA 

SYMSFL 

535 

074  1 6 

89718 

8C00946A 

SAM 

BMSK 1 ♦ 38 

536 

07418 

89720 

6006 

JU 

*♦6 

S36 

07419 

89721 

0700 

537 

074  1 A 

29788 

64046CF2 

JS 

XYDOF 

538 

074  1 C 

89724 

0400788C 

PTP 

XFX 1 

539 

074  1 E 

29786 

1 4007340 

LDA 

SYMSEL 

549 

07430 

29728 

8C00946C 

6AM 

BMSK 1*40 

541 

07488 

89730 

6006 

JU 

*46 

541 

07423 

29731 

0700 

548 

07484 

29798 

64046CF  2 

JS 

XYDOF 

543 

07426 

89794 

O400729A 

PTP 

XFX  8 

544 

07488 

29736 

1 4007340 

LDA 

SYMSEL 

545 

0748A 

89798 

8C00946E 

SAM 

BMSK1 442 

546 

0748C 

89740 

6006 

JU 

♦ 46 

546 

0742D 

8974  1 

0700 

547 

0748E 

29748 

64046CF2 

JS 

XYDOF 

54R 

07430 

89744 

040072A8 

PTR 

XFX3 

549 

07432 

89746 

1 4007340 

LDA 

SYMSEL 

550 

07434 

89748 

8C009470 

SAM 

BMSK 1444 

551 

07436 

29760 

6006 

JU 

*46 

551 

07437 

29761 

0700 

558 

07438 

29768 

64046CF8 

JS 

XYDOF 

553 

0743A 

89764 

04O078B6 

PTR 

XFX4 

554 

0743C 

89766 

1 4O07340 

LDA 

SYMSEL 

556 

0743E 

89768 

8C0O9472 

SAM 

BMSK 1446 

556 

07440 

29760 

6006 

JU 

*46 

556 

07441 

89761 

0700 

557 

07448 

89768 

64046CF  8 

JS 

XYDOF 

S58 

07444 

297*. 4 

040072C4 

PTR 

XFXS 

559 

07446 

89766 

1 4007340 

LDA 

SYMSEL 

560 

07448 

89768 

8C009474 

SAM 

BMSK  14-48 

561 

0744A 

29770 

6006 

JU 

*46 

561 

0744B 

89771 

0700 

568 

0744C 

29778 

64046CF2 

JS 

XYDOF 

563 

0744E 

897  ’4 

040072D2 

PTR 

XFXS 

564 

07450 

89776 

1 4007340 

LDA 

SYMSEL 

565 

07458 

89778 

8C009476 

SAM 

BMSK 1 450 

566 

07454 

29780 

6006 

JU 

*46 

566 

07455 

897*1 

070O 

567 

07456 

89788 

64046CF2 

JS 

XYDOF 

568 

07468 

897  14 

040072E  0 

PTP 

XFX7 

S69 

0746A 

29726 

1 4007340 

LDA 

SYMSEL 

570 

0745C 

29788 

8CO09478 

SAM 

BMSK14SS 

571 

0745E 

89790 

6006 

JU 

*46 

57  t 

0745F 

89791 

0700 

578 

07460 

29792 

64046CF2 

JS 

XYDOF 

573 

07462 

29794 

O40072FE 

PTP 

xrxa 

574 

07464 

89796 

1 4007340 

LDA 

SYMSEL 

575 

07466 

29798 

8C00947A 

SAM 

BMSK 1 454 

576 

07468 

29800 

6006 

JU 

*♦6 

676 

07469 

89801 

0700 

577 

0746A 

29802 

64046CF8 

JS 

XYDOF 

578 

0746C 

89994 

040078FC 

PTR 

XFX9 

579 

0746F 

29806 

1 4007340 

LDA 

SYMSEL 

580 

07470 

89808 

8C00947C 

SAM 

BMSK 1456 

581 

07472 

89810 

6006 

JU 

*♦6 

581 

07473 

298  1 1 

0700 

588 

07474 

29818 

64046CF2 

JS 

XYDOF 

CHECK  IF  SYMBOL  18  IS  DfSIRED 


CHECK  IF  SYMBOL  19  IS  DESIRED 


CHECK  IF  SYMBOL  00  IS  DFSIRED 


CHECK  IF  SYMBOL  81  IS  DESIRED 


CHECK  IF  SYMBOL  88  IS  DFSIRED 


CHECK  IF  SYMBOL  83  IS  DESIRED 


CHECK  IF  SYMBOL  84  IS  DESIRED 


CHECK  IF  SYMBOL  85  IS  DESIRED 


CHECK  IF  SYMBOL  86  IS  DFSIRFD 


CHECK  IF  SYMBOL  87  IS  DESIRED 


CHECK  If  SYMBOL  88  IS  DESIRED 
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5 INSTCODE  SOURCE  STATEMENT 

581 

07476 

2981  4 

A400730A 

PTR 

XFX10 

584 

07478 

29816 

1 4007140 

LDA 

SVMSEL 

585 

0747A 

29818 

8C00947E 

5AM 

BMSK 1 ♦ 58  CHECK  IF  SVMBOL 

29  IS 

DESIRED 

585 

0747C 

29820 

6006 

JU 

*♦6 

586 

0747D 

29821 

0700 

5«7 

0747F 

29822 

64046CF2 

JS 

XVDOF 

588 

07480 

29824 

04007318 

F'TP 

XFX1  1 

589 

07482 

29826 

1 4007140 

LDA 

SVM5EL 

590 

07484 

29828 

81 009480 

SAM 

RMSK 1 ♦ 60  CHECK  IF  SVMBOL 

30  IS 

DESIRED 

59! 

07486 

r>98  10 

6006 

JU 

*♦6 

591 

0748  7 

29831 

0700 

592 

07  4 88 

• 1 J 

64046LF2 

JS 

XVDOF 

593 

0748A 

298  34 

0 400/  326 

PTR 

XK  X 1 2 

594 

0748<" 

298  <6 

1400  <40 

LDA 

SVMSFL 

595 

07481 

298  »* 

Rf  O0Q482 

SAM 

BMSK 1 ♦ 62  CHECK  IF  SVMBOL 

31  IS 

DESIRED 

596 

07490 

8%  48 

6006 

JU 

*♦6 

596 

07491 

2984  1 

0700 

597 

07492 

64046412 

JS 

COMPASS 

598 

07494 

29844 

040071.14 

PTP 

HDG 

599 

07  496 

29846 

64047406 

JS 

DMAOUT 

600 

07498 

29848 

6410716E 

JGU 

PE  TUPN 

601 

* 

602 

* 

€01 

1 trgtbl  -- 

ROUTINE  TO  GFNERATF  TABLES 

OF  TRIG 

i FUNCTIONS  FOR  USE  BV  THE 

604 

t 

REAL  TIME  SUBROUTINES 

605 

03E  16 

15894 

ANG 

FOU 

TEMP42 

606 

03E18 

15896 

ANGINC 

FOU 

TEMP ♦ 4 

607 

03E00 

15872 

5UB5TK 

E OU 

ARGLST  TEMP  STORAGE  FOR  THE  ROM  TRIG  SUBROUTINES 

608 

* 

609 

0749A 

29850 

04007344 

TRGTBL 

PTP 

I.OCPTN 

610 

0749C 

898! 

5C 12 IF  12 

ldx 

6.SUBSTKM8.M 

61  l 

0749F 

8985  4 

140201O0 

LDA 

PL.  . M 

612 

074A0 

89*66 

0490 

CXF 

613 

074  A 1 

29857 

0700 

613 

074A2 

29868 

3C003F.14 

5TA 

TEMP 

614 

074A4 

29R60 

t 4008498 

LOA 

PI0V4 

615 

074A6 

29862 

R4O01F 1 4 

DVF 

TEMP 

616 

074A8 

2'1864 

3000  IF  18 

STA 

ANO.  I NC 

617 

* 

618 

074AO 

29866 

5C  420000 

LDX 

8.0.M 

619 

074  AC 

29868 

j 4009484 

LDA 

F ZERO 

620 

074AF 

29870 

3C0O3E  16 

STA 

ANG 

621 

074P0 

29872 

30409202 

STA 

TANTBL.fl 

622 

074B2 

29874 

1 400948A 

LDA 

ONE 

621 

074FM 

29876 

30409000 

STA 

COSTBL. 8 

624 

* 

625 

074B6 

29878 

6C  420002 

LOOPCN 

IMP 

8. 2.  M 

626 

074BR 

29880 

24410200 

I CL 

8.RLX2.M 

627 

074BA 

29882 

74007344 

PTA 

LOCRTN 

628 

074BC 

29884 

1 4003E 16 

LDA 

ANG 

629 

07  4 BE 

29886 

BO003E18 

ADF 

ANG I NC 

6 30 

074CO 

29888 

30  00  IF  16 

5TA 

ANG 

631 

07402 

29890 

64040444 

JS 

COSFA 

6 3? 

074C4 

29892 

9 f 409OO0 

STA 

COSTBL . 8 

631 

074C6 

29894 

1 4003F  16 

LDA 

AUG 

I -4 

074CR 

29896 

64940*7  t 8 

JS 

TANEA 

635 

074CA 

29898 

9C409202 

5TA 

TANTBL. 8 

636 

074CC 

29900 

6096 

JU 

LOOPCN 

637 

* 

638 

* ROUTINI  TO  OUTPUT  THE  TVRSTR  TO  THE  DIGITAL 

TO  VIDEO  CONVIRTER  < DVC  ) 

639 

» 

141 

07  40  D 

29901 

0700 

640 

074D6 

29910 

OPG 

DMAOUT 

14) 

074B6 

299  J0 

049074F  A 

PTP 

DMARTN 

642 

074D8 

29912 

4 89  n 

TSTUCZ 

Din 

1 9 .K 

641 

07409 

29913 

0 700 

641 

074DA 

2991  4 

80020001 

SAM 

1 .M 

•44 

07-4DC 

299  ♦ 6 

60°4 

JIJ 

TSTUCZ 

644 

074DD 

29917 

0 700 

646 

874DF 

29918 

1 400741 8 

LDA 

UCCMP 

A 8 


FOCAP-S  V10.03  PACE  11 

LINE  ABS  ADDRESS  INSTCODE  SOURCE  STATEMENT 


646  074E0  29920  4890  DOA  19, K 

647  074E1  29921  0700 

64?  074E2  29922  14020001  LDA  1 , fl  HARDWARE  CLEAR  THE  TVR9TW 

64B  074E4  29924  4A90  DOA  10.0.K 

649  074E6  29926  0700 

649  074E6  29926  740074EA  RTA  DMARTN 

650  074E8  29928  8CF080U0  UOCMP  HEX  8CF08OD0  • 1'8  OQNPLEMCNT  OF  1840  AND  THE  HALF  URD  BTRTINO  ADDR 

651  074FA  29910  DMARTN  ASA  2 

652  * 

653  * 0LR8TR  ROUTINE  TO  OLEAR  THE  TVR9TR 

654  074FO  PAtnp  040079-14  CLRSTR  I TP  l.OCl'TN 

655  074FE  29934  34007I  FE  L.riF  TVRSTR  2 

666  0741)0  2993b  tfbwy  £AU 

667  074F1  R9917  0700 

667  07  4FP  29932  14020000  LDA  0.M 

66*  074F4  29940  0620  LVA  0 

6S9  074FS  29941  0700 

659  074I  6 29942  5C4R0OOF  LDX  * , UPLX2  1,M 

660  074F*  29944  SC 220080  LDX  4 , MRL . M 

661  074FA  2994fe  2A06  L00P1  MF M 0.4  tXFFRS  <UPLXR*HRL>  FULL  URDS 

662  074FB  29947  0700 

662  07  4 F • 29946  6C43O001  IMN  R.l.M 

663  074FE  29960  643074FA  »SU  I.00P1 

664  07600  29962  74007344  PTA  l.OCRTN 

666  I ND 


• ERRORS 
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LINF  APS  ADDRESS  INSTCODE  SOURCE  STATE MEMT 


139 

1 40 

141 

06000 

24576 

t ATLINF  ATTITUDE  LINE  POLLED  AN  ANGLE  EJJN 

* 

ORC  ATL I HE 

1 4 2 

06000 

24576 

O4O0949C 

P TP 

GLBPTN 

14  3 

1 44 

06002 

24578 

64  106006 

JGIJ 

* storage  eor 

STP  rpt 

ARGUMENTS  XEEPID  INTO  THIS  POUTII 

1 45 

03F00 

15872 

E I IN 

F OU 

ARGLST 

1 46 

07E0? 

15874 

THIN 

rou 

AR6L5T  *2 

1 4? 

03EO2 

15974 

PTCH 

E OU 

APGLST42 

1 48 

06  00  4 

24580 

l.OCPTN 

BSS 

2 

1 49 

06006 

24582 

5f  60949C 

STRTPT 

LDX 

12. GLBPTN 

ISO 

06008 

24584 

1464OOO0 

L.AF 

0,12.1 

151 
IS  2 

06006 

O6.0OB 

24686 

24587 

06E8 

• 0700 

LXA 

13 

isa 

06000 

24S9P 

6C620O02 

IMP 

12. 2. M 

l S3 

0600E 

2 4590 

1 C 60949© 

5TX 

12, GLPRTN 

IS  4 

06010 

24592 

1 4680000 

LDA 

0.17 

155 

060  12 

24594 

3C0O7E O0 

STA 

r I IN 

156 

157 

060  1 4 

24596 

1 4680002 

t MAKE 

LDA  2.13  A PEG  CONTAINS  THIN 

THF  POSITIVE  SENSE  OF  A PITCH  CHANGE  DEI 

1S8 

06016 

24S99 

9400948C 

MLF 

NONE 

159 

1 60 

06018 

24600 

3C003F 02 

STA 

* SCALE  F I IN 

THIN 

OVf P tP 1/2)  AND  CONVERT  IT  TO  A F! 

161 

06  A1  A 

24602 

1 4O03E00 

LDA 

E I IN 

1 6 8 

060 1C 

24604 

P 40O9496 

DVF 

PIOV2 

163 

164 

06O  If 

06020 

24606 

8460 

S4O200O0 

0400 

LDP 

CEX 

0 H 

1 65 

06021 

24609 

OC  01 

SPAD 

1 

166 

167 

06022 

24610 

7CO03E00 

t 

STB 

El  IN 

168 

06024 

24612 

5C6A000E 

LDX 

1 t . 11PLX2  2,M  1N1TIALI7F  WORD  i 

169 

06026 

246]  4 

l.r  ».2oO  :T 

L D>; 

12.  PPUX2-«7.M  INITIALISE  BIT  MA' 

1 70 

06028 

246  1 6 

1 4O0  7F  O0 

LDA 

r i tn  ( ne . ex  pt ) 

17T 

0602A 

24|  1 

64O2OOO0 

l.DFt 

0 , M 

172 

173 

0602C 

24620 

66.  O604C 

t 

.16 

f 1 P0S  ,v % 

17*< 

06O2E 

?46?2 

i r 00 J496 

F INEG 

FXA 

0NF5  CONV  El  IN  TO  A (4)  FX  PT  1 

1 76 

hf-,0  to 

2462  4 

A4OO9404 

A I)U 

I our 

176 

06O32 

24626 

!(  OO  tf  00 

*.r  a 

F I IN 

177 

060  4 

^4r,2? 

8*  0n  .4  46 

XMALE 

178 

060  76 

24630 

64706^44 

JU 

r.ASF  3 EITN  > <-PI'4> 

1 79 

060  7 

24632 

1 4009428 

CASF.4 

LDA 

PLU51  F I IN  < ( - P I o 4 ) 

1 80 

060  1A 

246  74 

t 4003E00 

SBli 

E TIN 

181 

0603C 

24676 

64O46064 

JS 

TAHEX  COME  TRIG  TBL  INDEX  AND  1 

18? 

0607F 

41  M 

1 40O7E 02 

LDA 

PTCH 

183 

06040 

24640 

662061 AC 

JG 

CASE 4A  PTCH  > 0 

184 

186 

06042 

24642 

6 4 1062  IE 

t 

JGU 

CASE  4P  PTCH  < 0 

186 

06044 

24644 

64046064 

CASE3 

JS 

TANEX  COMP  TRIG  TBI.  INDEX  AND  I 

187 

06046 

24646 

1 4007EO2 

LDA 

PTC  H 

188 

060  4 P 

24648 

667060E 2 

JG 

CASE  7A  PTCH  > 0 

189 

190 

0604  A 

24650 

647061 4E 

* 

JGU 

CASE 3B  PTCH  < 0 

191 

0604C 

24652 

8CO09446 

E IPOS 

SAM 

XHALE 

192 

192 

0604F 

0604E 

24654 

2 4655 

60OE 

0700 

JU 

CA9E1  EIIN  < (PI/M) 

193 

06050 

24656 

14009488 

C63E2 

LDA 

Pl.Ufel 

194 

06052 

24658 

E 400  If  O0 

SBU 

EIlM  * (PI /2  - EIIN) 

195 

0606  4 

24660 

64046064 

J9 

TANM  COMP  TRIO  TBl.  INDEX  AND  1 

196 

06056 

74  662 

1 4003F  02 

LDA 

PTCH 

197 

O6058 

24664 

66206 17A 

JG 

CASE2A  PTCH  > 0 

198 

199 

060SA 

24666 

64 3061 E 4 

* 

JGU 

CASE2P  PTCH  < 0 

1 » 

POO 

060SC 

24668 

64046064 

CASE  1 

JS 

TANEX  COMP  TRIO  TBL  INDEX  AMD  1 

201 

0605E 

24670 

1 4O03F  02 

LDA 

PTCH 

202 

207 

or  oro 

06061 

8467S 
146  - 

6266 

0700 

JG 

CASE  1 A PTCH  > 0 

203 

204 

06062 

84674 

6470612O 

t 

JGU 

CASE  IB  PTCH  < 0 

t ROUT  I HE  TO  COMPUTE  AND  LOAD  THE  TRIO  TABLE  INDEX  INTO  XR4  AND  ALSO  TO 
t COMPUTE  THE  EX  PT  ( B0 ) TAN<  ).  THE  ROUTINE  ASSUMES  THAT  THF  ARGUMENT  (PA)  TOR 
* THE  TAN  IS  TN  THE  A PEG.  THE  EX  PT  TANGENT  IS  STORED  IN  TANENC. 
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ate 

06064 

24676 

04006004 

TANFX 

PTR 

LOCRTN 

21 1 

06066 

24678 

0500 

EAB 

212 

06067 

24679 

080A 

SLLD 

LGRL  + 2 

213 

06068 

24680 

0841 

SLL 

1 

214 

06069 

24681 

06A0 

LXA 

4 XR4  - TRIG  TABLE  INDEX 

215 

0606A 

24682 

16009202 

LDA 

TANTBL. 4 

216 

0606C 

24684 

54020O00 

LDB 

0,  M 

217 

0606E 

24686 

0400 

CFX 

218 

0606F 

24687 

0C01 

SRAD 

1 

219 

06070 

24688 

7C00949A 

STB 

TANFNC 

220 

06072 

24690 

74006004 

RTA 

LOCRTN 

221 

X 

222 

* 

D 1 - 

1.0 

♦ T AN ( ) - PTCH/COS ( ) 

223 

X 

THIS 

POUT! NE 

ASSUMES  PTCH  IS  IN  THE  A REG  AND  XR4  ( 

224 

X 

THE 

ROUTINE 

RETURNS  UITH  THE  FX  PT  (B31)  VALUE  IN  1 

225 

06074 

24692 

04006004 

D1 

PTR 

LOCRTN 

226 

06076 

24694 

B6009000 

DVF 

COSTBL , 4 

227 

06078 

24696 

3C003E14 

STA 

TEMP 

228 

0S07A 

24698 

1 400948A 

LDA 

ONE  -1.0 

229 

.'607C 

24700 

BE009202 

ADF 

TANTBL, 4 -1.04  T AN  ( > 

230 

* 307E 

24702 

FC003E14 

SBF 

TEMP  -1.0  ♦ T AN < ) -PTCH/COS ( ) 

231 

~6080 

24704 

54020000 

LDB 

0 . M 

232 

f 3082 

24706 

0400 

CFX 

233 

< 6083 

24707 

0C01 

SRAD 

1 -(10  4 TANO  -PTCH'  „0S(  ) )/2 

234 

06084 

24708 

67806088 

JL 

OVRNG  TEST  FOR  OVERRANGE 

235 

06086 

24710 

74006004 

RTA 

LOCRTN 

236 

©£388 

24712 

7400949C 

OVRNG 

RTA 

GLBPTN 

237 

t 

238 

X 

D2  - 

1.0 

- T AN ( ) - PTCH/COS ( ) 

239 

X 

THIS 

ROUTINE 

ASSUMES  PTCH  IS  IN  THE  A REG  AND  XR4  < 

240 

X 

THE 

ROUTINE 

RETURNS  WITH  THE  FX  PT  (B31)  VALUE  IN 

241 

0608A 

24714 

04006004 

D2 

PTR 

LOCRTN 

242 

0608C 

24716 

B6009000 

DVF 

COSTBL. 4 

243 

0608E 

24718 

3C003E14 

STA 

TEMP 

244 

06090 

24720 

t 4O0948A 

LDA 

ONE  -10 

245 

06092 

24  722 

FE009202 

SBF 

TANTBL. 4 -1.0-  T AN ( ) 

246 

06094 

24724 

FC003E14 

SBF 

TEMP  -1  0 - TAN(  ) -PTCH/COS ( ) 

247 

06096 

24726 

54020000 

LDB 

0 , M 

248 

06098 

24728 

0400 

CFX 

249 

06099 

24729 

0001 

SRAD 

1 -(1.0  - T AN ( ) -PTCH/COSO  )/2 

250 

0609A 

24730 

65206088 

JN 

OVRNG  TEST  FOR  OVERRANGE 

251 

0609C 

24732 

74O06004 

RTA 

LOCRTN 

252 

* 

853 

X 

D3  - 

1.0 

- T AN ( > 4 PTCH/COS ( ) 

254 

X 

THIS 

ROUTINE 

ASSUMES  PTCH  IS  IN  THE  A REG  AND  XR4  i 

255 

X 

THE 

ROUTINE 

RETURNS  UITH  THE  FX  PT  (B31)  VALUE  IN 

256 

0609E 

24734 

04006004 

D3 

PTR 

LOCPTN 

257 

060A0 

24736 

B6009000 

DVF 

COSTBL . 4 

258 

060A2 

24738 

3C003E14 

STA 

TEMP 

259 

060A4 

24740 

1 400948A 

LDA 

ONE  -1.0 

860 

060A6 

24742 

FE009202 

SBF 

TANTBL. 4 -1  0 - TAN ( ) 

261 

060A8 

24744 

BC003E14 

ADF 

TEMP  -1.0  - T AN < ) 4PTCH/C0SC  ) 

262 

060AA 

24746 

54020000 

LDB 

0 . M 

26'* 

060AC 

24748 

0400 

CFX 

264 

060AD 

24749 

0C01 

SRAD 

1 -(1.0  - TANO  4PTCH/COSO  )/2 

265 

060AE 

247S0 

65206088 

JN 

OVRNG  TEST  FOR  OVERRANGE 

266 

060B0 

24752 

74006004 

RTA 

LOCRTN 

267 

* 

268 

X 

D4  - 

1.0 

4 T AN  ( ) PTCH/COS  ( ) 

269 

X 

THIS 

ROUTINE 

ASSUMES  PTCH  IS  IN  THE  A REG  AND  XR4  ( 

270 

X 

THE 

ROUT  INF 

RETURNS  UITH  THE  FX  PT  <B31)  VALUE  IN 

871 

060B2 

247S4 

04006004 

D4 

PTR 

LOCRTN 

272 

060B4 

24756 

B6009000 

DVF 

COSTBL. 4 

273 

0S0B6 

24758 

3C003E1 4 

STA 

TEMP 

274 

060B8 

24760 

1 400948A 

LDA 

ONE  . . -10 

275 

060BA 

24762 

BE009202 

ADF 

TANTBL ,4  -1.0  4 TAN ( ) 

276 

060BC 

24764 

BC003E14 

ADF 

TEMP  -1.0  4 TAN ( ) 4PTCH/C0S<  ) 

277 

060BF 

24766 

54020000 

LDB 

0.  M 

878 

)60C0 

24768 

0400 

CFX 

879 

060C1 

? 4769 

0001 

SRAD 

1 -(10  4 TAN ( ) 4PTCH/C0S( ) )/2 

280 

06002 

24770 

67206088 

JL 

OVRNG  TEST  FOR  OVERRANGE 

TBL  INDEX 


THE  B REG 


XR4  CONTAINS  THE  TRIO  TBL 
THE  B REG. 


INDEX 


THE  B REG. 


CONTAINS  THE 
THE  B REG. 


TRIG  TBL  INDEX 


51 


r 
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2R 1 

060C4 

24772 

74006004 

RTA 

282 

* 

283 

060C6 

24774 

64046074 

CASF1 A 

JS 

284 

060CR 

24776 

0808 

SLLD 

285 

060C9 

24777 

0844 

SLL 

286 

060CA 

24778 

0660 

LXA 

28? 

060CB 

24779 

0700 

287 

060CC 

247K0 

1 4020000 

LDA 

288 

060CE 

247R2 

0500 

LINE1A 

FAB 

289 

060CF 

24783 

0700 

289 

060P0 

24784 

t 4408000 

LDA 

290 

060D2 

247R6 

6 4609  4 0 4 

LOP 

291 

060D4 

24788 

3C40P000 

STA 

292 

0GOD6 

24790 

0500 

EAB 

293 

060D7 

24791 

0700 

293 

060  DP 

2479 ? 

A40O949A 

A DU 

294 

060DA 

24794 

6620G0E4 

JG 

295 

060DC 

24796 

84009488 

AND 

296 

060DF 

24798 

6C43001 0 

INN 

297 

060E0 

24800 

643060E  4 

JU 

egs 

060E2 

24802 

7400949C 

RTA 

299 

060E4 

24R04 

6C630002 

LOC  1 A 

INN 

300 

060EG 

24806 

643060CE 

JU 

301 

060E8 

24808 

5C62003E 

TST1A 

LDX 

302 

06OrA 

24810 

6C420002 

IMP 

303 

060EC 

24812 

6C6B0002 

IMN 

304 

060EE 

2481  4 

643060CE 

JU 

90S 

06060 

24816 

7400949C 

PTA 

306 

* 

307 

* CASE3A  — 

30R 

t 

309 

06062 

24818 

64046074 

CASE  3A 

JS 

310 

060F4 

24820 

0808 

SLLD 

31  t 

06065 

24821 

0844 

SLL 

312 

0606  6 

24822 

06  CO 

LXA 

313 

06067 

24823 

0700 

313 

060F8 

24824 

6C  4200OE 

IMP 

314 

0606 A 

24826 

1 4020000 

LDA 

316 

060FC 

24828 

0500 

LINF3A 

FAB 

316 

0606  D 

24829 

0700 

316 

060F  6 

24830 

14408000 

LOA 

31  7 

06  100 

24832 

04609444 

LOR 

3 1 R 

06  1 02 

24834 

3C  408000 

STA 

319 

06104 

24836 

0500 

EAB 

920 

06  1 05 

24837 

0700 

320 

06106 

24898 

A400949A 

A DU 

321 

061  08 

24840 

662061 1 2 

JG 

322 

0610A 

24842 

84009488 

AND 

323 

0610C 

24844 

6C 4 300 10 

IMN 

324 

0610E 

24846 

643061 12 

JU 

325 

06110 

24848 

7400949C 

RTA 

326 

06112 

24850 

6C630002 

L0C3A 

IMN 

3e7 

06  114 

84988 

6 4 3O60F  C 

JU 

328 

06116 

248S4 

5C62003E 

TST3A 

LDX 

329 

061  1 8 

24856 

6C 4 30002 

IMN 

330 

061  1 A 

24858 

6C6B0002 

I MU 

331 

061  1C 

24860 

643060F  C 

JU 

332 

061  IF 

2486,* 

7400949C 

RTA 

333 

* 

334 

t CASE IB  -- 

936 

* 

336 

06120 

24864 

6404608A 

CASE  IB 

JS 

337 

061R2 

2 4 866 

0808 

SLLD 

338 

06123 

24867 

0844 

SLL 

339 

06124 

24868 

06C0 

LXA 

340 

06*86 

24869 

0700 

340 

06186 

24870 

6C42000F 

IMP 

341 

061  28 

24872 

1 4020000 

LDA 

34  P 

0612A 

24874 

0500 

LINE1B 

EAB 

LOCPTN 

PI 

LGRL 
LGUPL  * 1 

8 XR8  CONTAINS  STRTING  RASTER  URD  NO 

0.M 


TVRSTR, 8 
BNSKO . 12 
TVRSTR. 8 


TANFNC 

LOC1A 

PLUS1 

8.UPLX3.M 

LOC  1 A 

GLBRTN 

12. 2.  M 

LINE! A 

12. BPUX2-2.M 

8 2.M 

13.2.  M 
L I HE  1 A 
GLBRTN 

(-PI/4)  < FIIN  < 0 . PTCH  > 0 

D 1 

LGRL 

LC.UPLM 

R XRR  CONTAINS  STRTING  RASTER  URD  NO 

8 , UPLX2-2 . N 

0.  M 


TVPSTP . R 
BMSK 1.12 
TVPSTP. R 


TANrNC 

LOC3A 

PLUS! 

8.UPLX2.M 

LOC3A 

GLBRTN 

12.2.  M 

LI ME  3 A 

12, BPUX2-2 . N 

8. 2. M 

13. 2.  M 
LINE  3A 
GLBRTN 

0 < FIIN  < Plx4  . PTCH<  0 

D2 

LGRL 

LGUPL+t 

B XR8  CONTAINS  STRTING  RASTER  URD  NO 

P.UPLX2  2 , N 

0.  M 


* 


* 

'J* 


% 
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343 

0612P 

24375 

0700 

343 

0612C 

24876 

14408000 

LDA 

TVPSTP.R 

344 

0612F 

24878 

C 4609444 

LOP 

BM5K 1 , 12 

345 

06 1 30 

248R0 

3C 408000 

STA 

TVR5TP  8 

346 

06132 

24882 

0500 

EAB 

347 

0613  3 

24883 

0700 

347 

06134 

24884 

rt40(VJ4QA 

ADU 

1 ANFHC 

34P 

06  l 36 

24886 

662061 40 

JG 

L0C1B 

349 

06138 

24888 

840O948R 

AND 

PLUS  1 

350 

0613A 

24890 

6C 4200 10 

IMP 

8.UPLX2.M 

351 

0613C 

24892 

24431 «00 

I CL 

P, P5TRU.M 

352 

0613E 

248*34 

740O949C 

RT  A 

glbrtn 

351 

06140 

24896 

6C630002 

LOG  1 B 

I MU 

12. 2. M 

354 

06142 

24898 

6430612A 

JU 

L INF  IB 

355 

06  1 4 *1 

2400^ 

5C62003F 

TST1B 

LDX 

12. BPUX2-2.M 

356 

06146 

24902 

6C  4 30002 

I MM 

8 , 2 . M 

357 

06148 

24904 

6C6B0002 

IMN 

1 3 .2.M 

358 

061  4A 

24*306 

641061 2 A 

JU 

1. 1 ME  1 B 

359 

0614C 

24908 

7400949C 

FT  A 

GLBRTN 

360 

* 

361 

* CASE3B  -- 

<-PI/4)  < FUN  < 0 , PTCH  < 0 

362 

* 

363 

e614E 

24910 

6404608A 

CASE3B 

JS 

r,R  . » 

364 

06150 

24912 

0808 

SLLD 

LG  PL 

365 

06151 

24913 

084  4 

SLL 

LCiUPLM 

366 

06t52 

24914 

0600 

LXA 

8 XR8  CONTAINS  STRTING  RASTER  URD  NO 

367 

06153 

24915 

0700 

367 

06154 

24916 

1 4020000 

LDA 

0 . M 

368  06 1 56  24918  0500  LINF3B  FAB 

369  06157  24919  0700 


369 

06158 

24920 

1 4 408000 

LDA 

TVPSTP.R 

370 

0615A 

24922 

C4609404 

LOR 

BM5K0, 12 

371 

0615C 

24924 

1C  408000 

STA 

TVRSTrf . 8 

372 

0615E 

84926 

O500 

FAB 

373 

0615F 

24987 

0700 

373 

06160 

24928 

A400949A 

APU 

TANFNC 

374 

06162 

24910 

66206 16C 

JG 

L0C3B 

375 

06164 

24932 

84009488 

AND 

PLUS1 

376 

06166 

24934 

6C420010 

IMP 

8.UPLX2.M 

377 

06168 

24936 

24431000 

I CL 

R, RSTRU , M 

378 

06160 

84938 

7400949C 

RT  A 

GLBRTN 

379 

06  1 6C. 

84940 

6C630002 

L0C3B 

IMN 

12, 2. M 

380 

0616F. 

84942 

64306156 

JU 

LINE3B 

381 

06170 

84944 

5C62O03E 

TST3B 

LDX 

12. BPUX2-2.M 

382 

06 1 72 

24946 

6C 4 20002 

IMP 

8.2.M 

383 

06174 

24948 

6C6B0002 

IMN 

13. 2. M 

384 

06176 

24950 

64306156 

JU 

LINF30 

385 

06178 

24952 

7400949C 

PTA 

GLBRTN 

386  * 

387  * CASE6A  --  CPI^4)  < FJIM  < CPI/8)  . PTCH  > 0 

388  * 


389 

0617A 

24954 

64046074 

CASE2A 

JS 

D 1 

390 

0617C 

24956 

0803 

SLLD 

LGUPL 

391 

06 1 7D 

84957 

0841 

SLL 

1 

392 

0617E 

24958 

06F8 

LXA 

13  XR 1 3 CONTAINS  STRTtNG 

URD 

COLUMN 

393 

0617F 

24959 

0600 

LXA 

8 XP8  CONTAINS  STRTING  RASTER 

URD 

NO. 

394 

06180 

24960 

1 4020000 

LDA 

0 . M 

395 

06182 

24962 

0805 

SLLD 

LGBPU 

396 

06183 

24963 

0841 

SLL 

1 

397 

06184 

24964 

06E0 

LXA 

18  XR 1 2 CONTAINS  STRTING  BIT  1 

MSK  1 

NO. 

398 

06185 

24965 

0700 

398 

06186 

84966 

1 4020000 

LDA 

0 , M 

399 

06188 

24  968 

0500 

LINE2A 

EAB 

400 

06189 

24969 

0700 

400 

0618A 

24970 

14408000 

LDA 

TVRSTR. 8 

401 

06180 

24972 

04600444 

LOP 

BMSKl . 12 

402 

0618E 

7 4 9 7 4 

30408000 

STA 

TVRSTR. R 

403 

06190 

24976 

0500 

EAB 

404 

06191 

8497 7 

0700 

404 

06192 

24978 

6C420010 

IMP 

8. UPLX2.M 

405 

06194 

24980 

24431000 

I CL 

8. RSTRU. N 

T 
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406 

06  1 96 

24982 

740O949C 

RTA 

GLBPTN 

407 

06198 

24984 

A400949A 

ADU 

TANFNC 

408 

0619A 

24986 

66206188 

JG 

LINE 2 A 

409 

0619C 

24988 

8400Q4B8 

AND 

PLUS  1 

410 

0619E 

24990 

6C6 30002 

INN 

12. 2. M 

411 

061  A0 

24992 

64306188 

JU 

LINE2A 

4 12 

061A2 

24994 

5C62003E 

L0C2A 

LDX 

12. BPUX2-2. M 

413 

06  1 A 4 

24996 

6C4300O2 

IMN 

8. 2.M 

414 

061  A6 

24992 

6C6P0002 

IMN 

13. 2. M 

4 IS 

061  A8 

25000 

64306188 

JU 

LINE 2 A 

416 

061AA 

25002 

7400949C 

RTA 

GLBPTN 

417 

* 

4 18 

* CASE4A  — 

(-PI/2)  < El IN  < 

419 

* 

420 

061  AC 

25004 

64046O9E 

CASE  4A 

JS 

D3 

421 

061AE 

250O6 

0803 

SLLD 

LGUIPL 

422 

061  AT 

25007 

084  1 

SLL 

1 

423 

061  B0 

25008 

3C003E 1 4 

STA 

TEMP 

424 

061B2 

25010 

6C693E1 4 

IMN 

13. TEMP  XR13 

425 

061B4 

25012 

06C0 

LXA 

8 XRR  CONTAIl 

425 

061B5 

250 1 3 

0700 

426 

061B6 

2501  4 

1 4020000 

LDA 

0.  M 

427 

061B8 

25016 

0805 

SLLD 

LGBPU 

428 

061B9 

25017 

0841 

SLL 

1 

429 

06  1 BA 

25018 

3C003E1 4 

STA 

TE"P„ 

12. TEMP  XR1 2 

430 

061  BC 

25020 

6C613E14 

IMN 

431 

061  BE 

25022 

14020000 

LDA 

0.  M 

432 

061C0 

25024 

0500 

LINE4A 

EAB 

433 

06 1 Cl 

25025 

0700 

433 

061C2 

25026 

1 4408000 

LDA 

TVRSTR , 8 

434 

061C4 

25028 

C 4609*104 

LOR 

BMSK0 , 12 

4 IS 

061 C6 

2S030 

30408000 

STA 

TVRSTR, 8 

436 

06108 

25032 

0500 

EAB 

437 

061C9 

25033 

0700 

4 37 

06  1 0 A 

25034 

6C 4200 10 

IMP 

8.UPLX2.M 

438 

06  tCC 

25036 

24431000 

I CL 

8. RSTPU, M 

439 

061CE 

25038 

7400949C 

RTA 

GLDRTN 

440 

06  1 D0 

25040 

A400949A 

ADU 

TANFNC 

441 

0G1D2 

25042 

66206 1 C 0 

JG 

LINE4A 

442 

06104 

25044 

84009488 

AND 

PLUS1 

443 

061D6 

25046 

6C630002 

IMN 

12.2 .M 

444 

061  08 

25048 

643061C0 

JU 

LINE  4 A 

445 

061  DA 

25050 

5C62003E 

L0C4A 

LDX 

12. BPUX2-2.M 

446 

061  DC 

25052 

60420002 

IMP 

8, 2.  M 

447 

06  IDE 

25054 

6C6B0002 

IMN 

13. 2. M 

448 

061F0 

25056 

64  3061 C0 

JU 

LINE4A 

449 

061E2 

2S058 

74O0949C 

PTA 

GLBRTN 

450 

t 

451 

* CASE2B  — 

<PI/4>  < FUN  < < 

452 

* 

453 

061E4 

25060 

64046O8A 

CASE  2B 

JS 

D2 

454 

061E6 

25062 

0803 

SLLD 

LGUPL 

455 

061E7 

25063 

0841 

SLL 

1 

456 

061ER 

25064 

3C003E14 

STA 

TEMP 

457 

061EA 

25066 

6C693E14 

IMN 

13. TEMP  HR 13 

458 

06  1 EC 

25068 

06C0 

LXA 

8 XRR  CONTAir 

458 

06  IE  D 

25069 

0700 

459 

06 1 EE 

25070 

6C42OFF0 

IMP 

R.RSTRU-UPLX2, 

460 

061F0 

25072 

1402O000 

LDA 

0.M 

461 

061E2 

35074 

0805 

SI.LD 

LGBPU 

462 

061F3 

25075 

0341 

5LL 

1 

463 

061E4 

25076 

3C003E14 

STA 

TEMP 

464 

061E6 

25078 

6C613E14 

IMN 

12. TEMP 

465 

061F8 

25080 

1 4020000 

LDA 

0,  M 

466 

06  IE  A 

25082 

0500 

LINE2B 

EAR 

467 

06  IF  B 

25083 

0700 

467 

061EC 

25024 

14408000 

LDA 

TVRSTR, B 

468 

061FE 

25086 

C 4609404 

LOR 

BMSK0. 12 

469 

06200 

25088 

3C  408000 

STA 

TVRSTR, 8 

470 

06202 

25090 

0500 

EAB 

471 

06203 

26091 

0700 

471 

06204 

25092 

6C 4300 10 

IMN 

8.UPLX2.M 

XR12  CONTAINS  THE  STRTINO  BIT  MSK  NO. 


PTCH  < 9 
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I 

i 


472 

06206 

86004 

643O680A 

JU 

473 

O6208 

25096 

7 4O0949C 

PTA 

474 

0620A 

260Q8 

,>4  009  4 90 

L0C2B 

A DU 

47S 

0620C 

26100 

662061 P A 

JG 

476 

0620E 

26102 

34009438 

AND 

477 

06210 

25104 

6C  6 ’<0002 

IMM 

478 

06212 

25106 

64  3061  FA 

JU 

479 

062 1 4 

26103 

Sr  I-, 200  3F 

T5T2B 

LDX 

4P0 

06216 

261  IO 

r « 420002 

IMP 

481 

06213 

25  1 1 2 

6C6HOO02 

IMN 

482 

0621 A 

2SU  4 

64  306 1 FA 

JU 

433 

062 1 C 

2SH6 

74009490 

PTA 

434 

* 

435 

t CASE4B  -- 

485 

* 

487 

062  1 E 

25113 

G4O460B2 

CASE4B 

JS 

488 

06220 

25120 

0803 

SLLD 

489 

06221 

25121 

0841 

SLL 

490 

06222 

25122 

06E8 

LX  A 

491 

0622.3 

26183 

0600 

LXA 

492 

06224 

26 1 2 4 

6O42OFF0 

IMP 

493 

06226 

26126 

1 4020000 

LDA 

494 

06228 

25128 

O805 

SLLD 

49S 

06229 

25129 

0841 

SLL 

4 96 

0622A 

26130 

06E  0 

LXA 

497 

0622D 

26131 

0700 

497 

0622'* 

251  32 

1 4020000 

LDA 

498 

0622E 

25134 

05OO 

LINE4B 

EAB 

499 

0622F 

251  35 

0700 

4 99 

062  30 

251  3b 

1 4 4O.iOO0 

LDA 

S00 

06232 

25138 

C 4609  4 4 4 

LOR 

501 

06234 

26140 

3C  40*3000 

STA 

602 

06236 

261  4.2 

O600 

FhB 

603 

062  37 

26 1 4 3 

0700 

503 

06238 

261  14 

6'  4 3MO  1 0 

IMN 

504 

0623m 

261  46 

6004 

JU 

504 

0629B 

25147 

0700 

505 

•6230 

26148 

7400949C 

RTA 

506 

0623E 

26150 

A400O4O0 

L0C4B 

A DU 

507 

06240 

25162 

6292 

JO 

50R 

0624  1 

25153 

0700 

508 

06242 

25154 

840094 8C 

AND 

509 

06244 

25156 

6C630OO2 

IMN 

S 1 0 

06246 

26168 

6098 

JU 

510 

06247 

25 1 59 

0700 

511 

06248 

25160 

6C62O03r 

TST4B 

LDX 

512 

0624m 

25 168 

6C 430002 

TMN 

513 

0624'' 

85164 

6C6P0O02 

TMN 

514 

06241 

86  1 6f» 

60A0 

JU 

514 

0624F 

25 1 b 7 

0700 

515 

06250 

25 163 

7400949C 

PTA 

516 

END 

O FRROPS 


L0C2B 

CLBRTN 

TANFNC 

LTNE8B 

PLUS1 

12. 2. M 

L INE2B 

12 . BPMX2-2, M 

P,  . P. . n 

1 3 . 2 . M 

LINE2R 

CLBRTN 

PI/2)  < EIIN  (-PI/4)  . PTCH  < 0 

D4 

LCUPL 

1 

13  XR13  CONTAINS  STRTING  URD  COLUMN 

? 

8 . RSTRU -UPLX2 , M 
0.M 
LGBPU 
1 

12 
0.  M 


TVRSTR, 8 
BMSK1 . 12 

TVPSTP.  9. 


P.UPLX2  M 
I.OC4B 

GI.BRTN 

TANFNC 

LINE4B 

PLUS  1 

12. 2.  M 

LINE4B 

12. PPUX2-2.M 

8. 2.  M 

i n . 2 , m 
L1NF4R 

GI.BRTN 


▼ 


I 
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139 

* VECTOR-  5VMBOL  --  PROVIDES  A STRAIGHT  LIME  Sf  7 HE NT  BEGINNING  AT  PI'Xl  VI 

140 

t 

TERMINATING  on  P2«X2.V2)  1 HE  COORDINATES  OF  BOTH 

141 

* 

POINTS  ARE  ASSUMED  TO  BF  SlAlFD  TO  M MAXIMUM  OF  1 0 

142 

06252 

25170 

ORG 

VECTOR 

143 

06252 

25170 

0400949C 

PTR 

QLBrtTN 

1 44 

06254 

25172 

64  10625C 

JGU 

STRTPT 

1 45 

* STORAGE  FOR  ARGUMENTS  XFEREB  IN  10  THIS  ROUT r ME 

1 4* 

00000 

1 0 

NARGX2 

5ETD 

10  THE  NO.  or  APGUMl  NTS  'TIMES  2*  TO  6'  XF  ERF  D 

14? 

0 3600 

15872 

XI 

EUU 

mrglst 

1 4q 

03E02 

15374 

VI 

E Gu 

ARGL5T+2 

149 

03E04 

15676 

X2 

EGu 

ARGLST-»4 

1S0 

03E06 

15876 

V2 

EQU 

hRGLST  *f‘ 

lSl 

03E08 

15620 

MARGIN 

EGU 

MRGL5T+8 

152 

.• 

15982 

XI 

F GU 

mRGLST-*  1 0 

153 

03E0<- 

1 56  84 

VI 

EGu 

MRGLST 4 2 

154 

06256 

25174 

locrtn 

B5S 

2 

155 

M 

251  76 

6C430010 

VIN  T 

I MN 

8.UPLX2  M 

156 

06266 

25178 

6C4P0010 

IMP 

8. . UPlXP  M 

157 

* 

158 

0625C 

25 1 60 

5C60949C 

sTRTPT 

LDX 

12.GLBRT N 

159 

0b2SE 

251' 2 

34640000 

LAE 

0.12.  I 

160 

06260 

251  "4 

06E8 

LX  A 

1 3 

161 

0626  1 

25ie5 

0700 

161 

06262 

25136 

6C 620002 

IMP 

1 2 . 2 . M 

162 

06264 

1 C60949C 

Six 

12. glbrtn 

163 

r TRANSFER  THE  mRGuMFNTS 

164 

06266 

25 1 30 

56 220008 

LDX. 

4 , NmR-.i  • 2 - 2 , M 

165 

06268 

25192 

1 666 0000 

XFEF* 

l.Dh 

0.4.1  J 

1 b6 

0626m 

25171 

3f  0n  :f  00 

5 T A 

hPGl*  ' 4 

16? 

06261. 

25  1 ' *6 

•v  2 hi-102 

iMri 

4 . 8 . 11 

1 68 

0b26E 

2519  c 

60^6 

JU 

'.FLR 

168 

06266 

15 199 

0 700 

169 

n 

170 

% 

171 

» LIMIT  THE 

INPUT  POINT  COORDINATES  XI. Vt  Y?  . V2  . TO  A MAXIMUM  ADS  VAt.UF 

1?2 

06270 

25200 

SC 220O06 

LL'X 

4 6 . M 

1?3 

06278 

25rf*»8 

1 6003E00 

lmnt 

LDm 

ARGL5T . 4 

174 

0b2?4 

252w4 

b404t>372 

JS 

LiMl  ) 

175 

06276 

25206 

3F00  3F  00 

STA 

APGI.5T  4 

176 

06272 

25208 

6>  v 30002 

I MN 

4 . 2 . M 

177 

0627A 

' 

6088 

JU 

LMNT 

177 

0627B 

-1  ! 

0700 

178 

* 

179 

r FORM 

V2-V1 

- VI  AND  y2-Xl  • XI  AND  DrTfPMINE  THE  QUADRANT,  UITh  RESPECT 

180 

* TO  i 

PI  ( XI  . 

VI),  THAT  THE  VECTOR  IS  T<  HE  PLACED. 

181 

0627C 

252  1 2 

1 400  3E06 

1 DA 

V2 

182 

0627E 

252  1 4 

F<;  003E07 

SBF 

Vi 

183 

06220 

25216 

3»  003E0C 

STA 

VI 

184 

06262 

2521 

1 4003E04 

LDm 

X2 

185 

06284 

2S220 

F »'  0o  jF  00 

5BF 

XI 

1 66 

0b286 

25222 

3600 jE0m 

STA 

XI 

187 

062PP 

25224 

54003F0C 

LDB 

VI  A REG  • X2X1  , B REG  • V2-V1 

138 

* 

189 

06286 

25226 

6306 

jl 

XINEG 

1 90 

0628ft 

25227 

0500 

EAR 

VI  IN  A 

191 

0628C 

25228 

67206  30C 

JL 

GUAD4 

192 

0628E 

25230 

0500 

EAB 

XI  IN  A 

193 

06266 

25231 

6109 

JN 

0UAD1 

194 

06290 

25232 

0500 

EAB 

VI  IN  A 

195 

06291 

25233 

6107 

JN 

GUAD1 

196 

06292 

25234 

-’400949C 

RTA 

GLBRTN  XI  -0  .VI  • 0,  'SPECIAL  CASC > 

197 

06294 

25236 

0500 

XINEO 

EmB 

VI  IN  A 

198 

06295 

J! 

6345 

JL 

0UAD3 

199 

06296 

25238 

6020 

JU 

GUAD8 

200 

* 

201 

* OUADRANT  1 

— XI  > • 0.  VI  >•  0 

202 

06297 

25239 

0700 

202 

06298 

25240 

1 4001E0A 

0UAD1 

LDA 

XI 

203 

0629A 

25242 

Fr  003F0C 

SBF 

VI 

204 

0629C 

25244 

630E 

JL 

C A5E2 

205 

t CASE 

1 -- 

XI>-  VI 

56 
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2*6 

0629 r- 

« . 4* 

* ✓** 

2*6 

0*>r  Vl| 

. ‘ ' ■ C 4 *. 

6 400 ‘if  0A 

fast  i 

LDP 

XI 

PUT  DENOMINATOR  IN  B 

2*7 

062  m* 

• ■ 4 

1 4O03E0C 

LDm 

VI 

PUT  numerator  IN  A 

2*8 

062m2 

25260 

64046334 

JS 

MISCAL 

COMPUTE  TONFNC,  PERFORM  LIMITING  SF  T UP  INDFV  Ml  IJ 

2*9 

062A4 

1 « 

1 4O06258 

LPA 

VINST 

21* 

062m  t. 

25854 

) ■ 

STh 

VINST1 

CHANGE  I NOT  IN  VE*  TRl 

ROUTINE 

211 

062A 

26266 

...»  HI,  40 

JCU 

VECTP1 

212 

* CASES 

XI<  I 

213 

0€ 

25268 

54003E0<: 

CASE  2 

LDP 

VI 

Put  denominator  in  b 

214 

*62  Ac 

25860 

1 4003E0A 

LDA 

X I 

PUT  NUMERATOR  in  H 

215 

062aF 

26262 

I-.404  6 i :4 

IS 

MI  Sr  AL 

216 

062B0 

25264 

1 4 00685  - 

LDA 

vINST 

217 

062B2 

3'.  006  3c 6 

.’1  : 1 

VINST3 

HAN-  F IN'  ’•  T N VF  . TP2 

ROUT  INF 

218 

068  6 4 

2Cr.» 

64  -•  B 

l.jl  | 

vr  c ip. 

219 

♦ 

22* 

• OUADP 

ANT 

2 --  :i  o , 

VI  > • 0 

221 

062B6 

25270 

1 4O03E0C 

1 

L pH 

VI 

222 

062 1 

• 

P»‘  00  1 0H 

A OF 

XI 

223 

068B»< 

2S2V4 

6 3 1 0 

JL 

CASE  4 

224 

* CASE  3 

MAG (XI  i < VI 

22S 

062  Ft  B 

25275 

0700 

225 

06,  P- 

' 

1 4O0  3F 0A 

CASE3 

LDA 

XI 

226 

068BF 

862V  3 

940H943C 

MLF 

MONE 

NUMERATOR  IN  A 

227 

068C  0 

25230 

5.44*0  :f  o* 

LDP 

VI 

DENOMINATOR  IN  b 

228 

©AW'' . 

26.  .'88 

64*46 334 

JS 

MISCAL 

229 

062C4 

, V.  4 

1 4006868 

LDA 

VINST 

230 

062CA 

25286 

3C0063EC 

STA 

VINST3 

CHANGE  INST  IN  VECTR3 

ROUTINE 

231 

068'  8 

26288 

P4063E0 

JGIJ 

VECTR3 

232 

* CASE 4 

MAGf XI i > VI 

233 

062CA 

2S290 

1 40O3E0A 

CASE  4 

LDA 

XI 

234 

062CC 

25292 

9400943C 

MLF 

HONE 

235 

062CE 

26294 

0600 

FAB 

DENOMINATOR  IN  B 

236 

062-'  r 

26296 

0700 

236 

062D0 

•i 

i 4O0  3E0' 

LDA 

VI 

NUMERATOR  IN  A 

237 

062D2 

91 

» 4 A 4 6 3 3 4 

JS 

MISCAL 

238 

062P4 

. « 00 

l 400625- 

LPA 

VINST 

239 

068  P6 

9C  0064 , :* 

STA 

VINST4 

CHANGE  INST  IN  VECTR4 

ROUTINE 

240 

0628. 

4 

0 4 .06406 

Jt.U 

VEcTR4 

241 

* 

242 

* OUADPmHT 

3 --  XI  < 0. 

VI  < 0 

243 

062DA 

•• 

1 4003E0C 

9UAD3 

lI'h 

VI 

244 

062Pi 

. . . 

F • i>t  • | viA 

• Hf 

XI 

246 

062.DE 

1 > 

6 318 

JL 

• ASF6 

c4b 

♦ CASES 

MAG' ■ I • MAG' VI ) 

247 

062  DF 

26  31  l 

0700 

247 

0v>2E  0 

12 

1 400  ;«F0' 

CASES 

LPA 

VI 

243 

0*  2F  8 

, ■ '14 

94  0094'  <’ 

MLF 

MANE 

249 

Om  f 4 

• ■ 

f.  00  3L  1 4 

ST  a 

TEMP 

26* 

06 2 E 6 

26  3 l 3 

l 4i«o  jL  0m 

LDA 

I 

6S1 

*»-'  . r 

• 4o0 '-14  ' 

MLF 

MONE 

262 

*►  M 

86  322 

06*0 

Enp 

denominator  in  n 

25  3 

066E  fci 

■ 

0700 

2S3 

062 EC 

35384 

1 400 3E 1 4 

LDA 

TEMP 

NUMEPATOP  IN  A 

254 

068EF. 

«,  « . 

• 40463  i 4 

JS 

HI SC AL 

255 

062F  •« 

86  388 

1 4t*OM,  ' A 

L Dm 

VINST  4-2 

256 

06  f . 

‘ 

:•  00i-.  480 

STm 

VINST 4 

CHANGE  IN  T IN  VF0TR4 

ROUTINE 

2S7 

At., -r  4 

• 4 t >*.  401  • 

JlU 

VJ  .*TP4 

wS8 

* CASE 6 

MAG  t . I » • I1nG(  YI  > 

259 

062F  6 

86  3 34 

1 4*0  3E0m 

CASE  6 

LDA 

XI 

26* 

06.  'F  : 

1 

9 4*.  0 94  F 

Mi  » 

H"NE 

861 

062 F m 

26  3 38 

• **<  > :i  i -t 

: . r m 

1 1 HP 

862 

a.  t r. 

1 400  1 U« 

LPh 

VI 

263 

0686 £ 

26  342 

Mi.F 

monf 

dfc»4 

06  !0U 

0600 

f i-H 

DENOMINATOR  In  " 

266 

06  ^ I 

26  145 

v»70o 

265 

06  ?0,  * 

1 400  h 1 4 

Lf'A 

TEMP 

NUMFRhIoE  IN  m 

266 

06  304 

• '■!' 

h.4046  3 34 

JS 

MI  SC AL 

267 

06  0» 

, 1 >60 

| 4 1 *« '•  M 

Lt'A 

VlN jT  *2 

268 

06  IH 

25352 

0A6.3E*. 

STA 

VINST 3 

Change  In  t in  VECTP3 

ROUTINE 

269 

06  30m 

• i 

• 4 > 'i  IF  n 

JCU 

VCC TP  3 

270 

♦ 

57 
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2?  I * 

272  t OUADRmNT  4 — XI  0.  VI  < 0 


273 

06  30 

• 

14003E 0C 

GUAD4 

LDA 

VI 

27  4 

06  Or 

Tie  :• 

[;'  oo  » Mi, 

MDF 

XI 

275 

06  10 

28  360 

• 314 

JL 

•:  rtSF  ? 

276 

* • ASE8 

XI 

> Mm<  . i .1  > 

27? 

06  3 1 i 

. 

0700 

277 

06312 

. « , 

l 400  iF  08 

ASF  8 

LDA 

VI 

275 

06  3 1 4 

,4  0004  ' 

MLh 

MuNE 

273 

66316 

.26  366 

mSOO 

F.hB 

2*70 

06  ‘i  1 7 

. 

0700 

230 

06 

1 400  .1  MM 

LDA 

XI 

2*1 

06  ' 1 M 

26  1 *m 

M 8 M 0 

» HP 

DENOMINATOR  IN  P.  NIJMf  RATO***  f N A 

282 

06  ; \ 1 

a*  »7  i 

0'*0O 

2 - 2 

063  1 • 

26  17,* 

. 404.  • 1 

JS 

MISCAL 

« - < 

06  : 1 1 

9*.  174 

1 4*'0m. 

LDA 

V INST  *8 

284 

06  »2.» 

' '• 

W <M. 

67  m 

VIH8.T1  CHANGE  IN*’T  IN  VK'TRl  P"UfrMf 

285 

0*  . 1,'. 

9 

*.4  "i  'O 

»V.U 

VI  • TW1 

236 

♦*  8 0SE 

7 - 

XI 

M..','  VI  ) 

237 

06924 

25380 

1 400  ':F  Or 

f A* M 7 

1 Dh 

VI 

238 

063  2 r 

25  382 

04OMM4 

mlf 

NONE 

239 

06  32 - 

1 

0600 

FAB 

DE NOMINA  TOP  IN  p 

290 

06  929 

25  386 

0”00 

290 

0632m 

. 5 98*6 

1 400  ,r  Oh 

LDA 

XI  NUMERATOR  IN  A 

29  1 

0632' 

25328 

64042 9 34 

JS 

MISCAL 

292 

0M  9,-.*f 

J*>  190 

1 4oO.  . f.r, 

LDA 

v ins  r < P 

293 

0t>  ^ jo 

253*12 

J t 006  u 

ST  A 

V IN  j TJ  CHANGE  J NbT  IN  VC CTR2  ROUTINE 

294 

06332 

25  304 

64306 <88 

JGU 

VECTR2 

295 

* 

296 

* MISCAL  -- 

MIS*  I LLANF  OUS  C AL>.  UL.h  T ! ONS  THAT  PERFORM  THE  FOLLOWING' 

2w? 

• 

( 1 

) COMP  'iES  TH::  TANFNC 

298 

* 

(2 

• INITIALIZI  XRA  TA  THE  INTEGER  LENGTH  OF  THE  VECTOR 

299 

» 

<3 

» *P  V"  TH1  ST  hR7  1NG  WORD  U I THIN  THt  T VRSTR 

300 

» 

t 4 

• STORE  s THE  STaRT  IMG  F:  1 T Ml  THIN  THF  T VRSTR  (JORD  IN  TEMP4 

30  1 

♦ 

THIS  PM III  INI  M*.  •HMi  n«A7  TIJI  P f-*»  . I4T  i AM  I MAT' .p  OHL<  '1  HF 

J02 

♦ 

A 

REG  - HUMERr.lvR 

30  3 

06334 

26396 

04006256 

MISCAL 

PTP 

LOC  RIM 

jk*4 

06336 

25398 

7C00  <F  1 4 

STB 

U MR 

306 

06  3 3* 

2'*.  400 

1 .4«>.9«i’O0 

l.DR 

O M 

!06 

0*  ! Im 

■ 40i 

b4oo  if  i 4 

P7I 

n MR 

307 

0*-  < 3' 

4«>4 

m4mO 

*.» 

308 

06  3 3D 

4 ■ 

Oi  Ol 

PhD 

l 

309 

O.  1 

4«*. 

'<  MM  . l’l,| 

• . r re 

FaHF  NC 

310 

06  4 0 

, ■ r . 4 •• 

1 .(Mil  . '»•  1,  ' 

1 I'M 

1 i . • t 

31  1 

0*r  i-l, 

. ' 4jo 

I ...1  It  0(1 

I l«H 

o . M 

<12 

0694  4 

.'.4  1.' 

» . MM  '(  M 

•or 

Mill  GIN 

<13- 

0*.  i 4 » . 

4 14 

t.  CM  J,. 

i .t 

n MP4.* 

J 1 4 

0»-.  !4 

■ 4 i • . 

•400  l 4 

Mi.r 

i f Mr* 

31b 

06  I4*i 

.-.41 

1 4020000 

LDb 

0 . M 

316 

06  94* 

. 1 420 

0400 

rr 

317 

06940 

.6421 

06C  8 

LX  A 

<1 

318 

06  < 4f 

' 4,  2 

1 400  <t  16 

LDh 

TEMP4.9 

319 

06  350 

26424 

9 4 00  3F  02 

Mlf 

VI 

320 

06  n . 

26426 

94009480 

MLF 

MANE 

321 

063C4 

25422 

BO  009492 

AOF 

F 128 

322 

06356 

254  30 

0400 

CFX 

323 

06  357 

254  91 

0844 

SLI. 

4 

324 

063* 

« 4 

0600 

LX  A 

J>.  XP8  - starting  raster  line 

326 

06  360 

264  <3 

0700 

326 

06350 

28  4 4 

1400  4 16 

LDA 

TEMP ♦ 2 

326 

06  35C 

25436 

9400  31  00 

MLf 

XI 

327 

063SE 

26  4 92 

BC0O9492 

ADF 

F 128 

328 

06  360 

2 440 

0400 

CFX 

329 

06  361 

25441 

0700 

329 

06362 

25442 

54020O00 

LDB 

0.  M 

330 

06364 

25444 

0C0S 

S*oD 

5 

331 

06  365 

■ 4-.' 

0041 

5LL 

1 

332 

06366 

-8  44. 

3'  00  31  1 4 

5Tm 

TEMP 

333 

06  365 

■ 

6'  40 jf  1 4 

I no 

8, TEMP  XRP  - STARTING  HARD  NO 

334 

0636h 

,*‘.4‘  0 

l 4020000 

LDh 

k? , M 

J 3b 

06  36*: 

4 

0806 

6i  i.D 

6 

58 
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Lib 

vtb  jul* 

'■  .4‘ 

e>  b ¥/ 

336 

...  . 

4 

Ill'll  , 1 

5 T6i 

TEMP* 4 TEMP 

33? 

06  370 

S4 ' • 

' '-ll'l'l  ,'*  ,(. 

Pi  m 

i.OfPTM 

9 38 

t 

.1  J9 

% LIMIT 

LIMITING  POUTINE . 

44  o 

t TO 

RF  L 

M I Tf  r» 

341 

06  372 

.'5  458 

0 4006.. 56 

LIMJ1 

PTr 

LOCRTM 

34a 

06  374 

254  i,i' 

20  it  14 

ST  A 

TEMP 

34  3 

06  376 

. ‘ 4i,.: 

626JE 

JC. 

PLOC 

34  4 

0637? 

2546. 

0700 

344 

06  37: 

5 *1  • . ‘i 

f C OOO 4 aC 

SB  F 

NONE 

345 

06  37h 

254  5 6 

»,  lOfc, 

JL 

NEGl.I  M 

1 4b 

06  37  B 

, : 5 4 > . 

0700 

340 

06  37'. 

. 4. 

1 400  414 

LDA 

TEMP 

t4? 

06  3?L 

. ' 0 

. 400*  , 5t , 

PTi. 

LO'-RTN 

3 4 ft 

06  380 

4 . 

■V  ...  | , 

NF6LIM 

1 . i'M 

MONf 

J4'J 

0b  1 . 

•4  4 

1001  ' i 

R’l  n 

i n.  l-TN 

450 

0t> 

■ -54'  • 

I • i.H'HXH 

Pl.OC 

‘Hi 

Out 

' 

• • . t'10 

352 

0*  f 

■ ■ 

! 4o..  , 1 4 

i . 1 *i  i 

TE  Mi- 

35  3 

06  ' II 

. '4  , 

4f*<  . '•  .i. 

riii 

I . M p 'I'd 

354 

i*. 

, ' •!  • 

1 I.-'  ■ ■ i. 

1 ••'  i III 

1 Im 

"Ml 

355 

06  1-4 

. '5  4 »• 

■ "• 

L<‘"  kTm 

r vr  6 i 

R 1 

VF i If  «■•  UTINI  1 

j5B 

06  •'30 

. 54 

5C620031 

vt  - rp  i 

t . I..  - 

i.'  Bf".'<2-2,M 

355 

06  V4,? 

2‘  4 *1' 

• • . 1 i 

1 MM 

1 . i i • ir* « 4 

JbH 

06  .94 

. •'  -i  *, 

! 4 i "lUi 

LF,*i  i 

0,  M 

361 

06  :9», 

2 54  M 

0500 

VI  LOOP 

FoB 

36.3 

06  (9? 

.*54  *5 

O O0 

362 

063-0 

.1  .. 

1 4 4>  »'  ooO 

LDA 

TVR5TP . P 

36  3 

(H  . fin 

254  '' 

i 46 O'  1 4 0 4 

LOP 

BMSK0  1 . : 

Jb4 

V).  . . 

i '55no 

40  01*0 

STm 

TVR5TP . 8 

J65 

06  J9E 

2 5 5 O c' 

t'C  4fctooo  l 

1 UN 

9 . 1 ,M 

366 

06300 

. 1 1 04 

6004 

JU 

LOCI 

366 

06  30  I 

, *55iir, 

0?00 

36? 

06  362 

, 

7400949C 

PTA 

GLBRTN 

368 

06  304 

, -5'  ,o 

0500 

LOCI 

t MB 

369 

06  16.5 

0700 

369 

06  no. 

i i4OU'J*I90 

h DU 

TANF nc 

370 

06  308 

25512 

bcCOO 

JG 

LOCI  A 

37’ 

06  <H'I 

' f 

0700 

371 

06  36m 

255 1 4 

46)Of-| 

AMI) 

PLUS  1 

372 

06  *Af 

255  1 6 

. -1  • ' i • 

V IN5T1 

I I1H 

a , uPLva , m 

.<7  3 

06.  i 

255  1 3 

tit,  .'002 

L"‘  1 A 

I MI  I 

1 ?. . 2 , M 

374 

06  lb0 

25520 

b09r» 

JU 

VI  LOOP 

374 

0b  Jb  1 

. ■ ' . • 1 

0700 

>75 

06  I : . 

,*55  V 

f < i , no  1 

I.DV 

1 2,  BPliJXri-  ,7.  M 

376 

0f  : f 4 

. 55.  4 

i . 4.  »>002 

IMP 

? * . a , m 

37? 

01  f.. 

■ 

* *Vi»* 

JU 

V 1 LOOP 

373 

* 

379 

• VFCTP.: 

vector-  Routine  ?. 

330 

06  ip? 

2552? 

0 700 

380 

0..  p 

2552? 

r ( l 200  ,f 

VF5TP2 

LDV 

1.5  BP'J*2-2,M 

33  J 

06iF.M 

,?55  i0 

6 f 1 111  l 8 

I MM 

1 2.  Tl  Hf  i 4 

332 

0b  iB'. 

255  *2 

1 4 n,  "O00 

LDA 

O . M 

383 

0 f > 4RI 

255  ,4 

050'1 

V2LOOP 

» Mfl 

3 34 

06  >Dt 

255  j5 

0700 

33  4 

06  .<  .i 

1 5 . 

i 4 40'  .‘On 

LDA 

TVRSTP , 8 

385 

0K  ' 

4i.O  *404 

1.6'P 

RM5K0  1 . 

386 

0*.  •(  4 

• 

' 40  onn 

6 f H 

TVR'.TR  . 8 

38? 

06  3C  r 

r r,4,’: 

* • /|  ll  ill  1 0 

VIN5T2 

1 MM 

8 , UPL  2.M 

388 

0*  • 

,.  . 

i . 4 F<""0  1 

I MM 

9 , 1 , M 

389 

06  If  r. 

. J5r-  4 6 

i ,004 

JIJ 

LOO  2 

389 

06.  • 1 

2554? 

0700 

390 

06  if  6 

, 

4 0 O 

PT  A 

GLBRT N 

391 

06  <f  1 

25550 

. 50o 

L0C2 

E Ml) 

392 

0b  35  F 

■ 6 i 

0700 

392 

06,  >ri0 

,,4"OU  4 9m 

ADU 

TANf  M‘ 

393 

06.  ib. 

•5C  4 

i.f*94 

.)(» 

V2l00i 

19  4 

0»  d ■ 

0?00 

39  4 

06  ,ir*4 

' ' 

4 00  * 4 

i'll  ID 

plus  i 
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ASRf  MK 

nr  x 

El 000OO0 

155 

% 5T0RA  r.f  ARFA 

FOR  THE  AIPSPFFD 

TAPF  DOT  ARRAV 

155 

06760 

66591 

©0055550 

HEX 

00055660 

157 

06768 

26594 

00056550 

HEX 

00066650 

158 

0675  4 

26596 

00065660 

HI  X 
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o 
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00038F00 
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26790 

00045100 
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00046100 
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26799 
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257 
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00006 1 00 

HF  X 
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258 
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26796 
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06UAE 
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O00.38f.00 
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068R0 
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0 
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0 
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06RP4 
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00000000 
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0 
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26806 

00000000 

HEX 

O 
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068B8 

26808 

00F  f 01100 

HF.X 

00r  E00O0 

266 
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268  1 0 

*0000000 

HFX 

0 
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0C8BC 

• • i 

0000(1000 

HFX 

0 

267 

068BF 

26814 

00000000 

HFX 

0 
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068C0 

26816 

00000000 

HEX 

0 

269 

0F.8C2 

26818 

00038FO0 

HEX 

O0038F00 

270 

06  8 C 4 

26890 

0004* 1 00 

HF  X 

*10045100 

271 

068C6 

96829 

00046 1 O0 

HF  y 

00045100 

272 

068C8 

26924 

0dF 39100 

HF  X 

0AE  39100 

27J 

0680  A 

26826 

00046100 

HEX 

00045100 

274 

0686C 

26829 

00046 1 O0 

HF  X 

OO0461 00 

276 

068CE 

26830 

00039F00 

HF  X 

0O038FO0 

276 

06800 

26832 

00000000 

HEX 

0 

277 

068D2 

26834 

00000000 

HEX 

0 

378 

069  D 4 

268  "^6 

00000O00 

HEX 

0 
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00000000 
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0OFE0000 
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O0EF0O0O 
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281 

068DA 

26842 

00000000 

HCX 

0 

282 

068I»r 

26844 

00000000 

hf  y 

0 

283 

068DF 

26846 

00000000 

HE  X 

0 

284 

068F0 

26848 

00000000 

MFy 

o 

28S 

068E  P. 

26860 

O00?f  r 00 

HF.  X 

000 7cr 00 

288 

068E  4 

26852 

00006 1 00 

Hr  y 

00006 1 00 

287 

068EK 

26864 

0000'  It  00 

hf  y 

00009 1 00 

288 

068F8 

2686b 

001 11100 

HEX 

OOF  11100 

289 

068EA 

26863 

0001 1 100 

HEX 

0001 1 1O0 

290 

068EC 

26860 

00021 1 OO 

hf  y 

00021 100 

291 

hue 

26862 

O0O2OF  00 

HEX 

00Or»0EOO 

292 

068F  0 

26864 

00000000 

HEX 

0 

293 

068F2 

26866 

00000000 

HEX 

0 

294 

068F4 

26868 

00000000 

HEX 

0 

29S 

068FC 

261  6 

00000000 

HEX 

0 

296 

068F8 

00F  F.  0000 

HEX 

00FE0O00 

297 

068FA 

26874 

00000000 

HF.  X 

0 

298 

068FC 

26876 

00000000 

HEX 

0 

299 

068F  f. 

26878 

00O00O00 

HEX 

0 

300 

06900 

26880 

00000000 

HEX 

0 

301 

06902 

26882 

O0098F  00 

HEX 

O0038FOO 

302 

06904 

26884 

O0046100 

HEX 

00045 1 OO 

903 

06906 

26886 

OO04 1 100 

HEX 

00041 100 

304 

0690P 

26888 

001 69100 

HEX 

oorsQloo 

90S 

069OA 

26290 

00065100 

HEX 

0OO65100 

306 

069OC 

26392 

00045 1 00 

HEX 

O0045100 

307 

0690k 

26894 

00O38EO0 

HFX 

O003RF  00 

308 

06910 

2689r, 

00O00000 

HFX 

0 

309 

06912 

26898 

00O000V0 

Hrx 

0 

910 

0691  4 

26900 

000 0'^' 100 

HEX 

0 

31  1 

06916 

26902 

000004100 

HE  X 

0 

312 

06918 

26904 

00F  F 0000 

HFX 

0OFFOO00 

313 

069  1 A 

2690b 

00000000 

HEX 

O 

31  4 

0691 C 

26908 

00000000 

Hrx 

0 

31S 

0691T 

26910 

00000000 

HFX 

0 

316 

06920 

26912 

OO000O00 

HEX. 

0 

317 

06922 

26914 

0007rp  00 

HCX 

0OO7CF.OO 

318 

06924 

26916 

0004 1 1 00 

HEX 

00041 100 

319 

06926 

26918 

00041 100 

HEX 

00041 100 

320 

06928 

26920 

OOF  79100 

HEX 

OOF  79 100 

321 

0692A 

26922 

00006100 

HFX 

00005100 

322 

0692C 

26924 

00005100 

HFX 

00006100 

323 

0692F 

26926 

OOO78FO0 

HFX 

OOO78E0O 

324 

06990 

26928 

00OOO0O0 

HEX 

0 

32S 

06932 

269  lO 

0000(1000 

HF  X 

O 

326 

06934 

26932 

00000000 

HEX 

0 

327 

069  36 

26934 

00000000 

HFX 

O 

328 

06938 

26936 

OOFE  0000 

HFX 

00FE000O 

329 

0693A 

269  IB 

00000000 

HEX 

0 

330 

0693C 

26940 

00000000 

HFX 

0 

331 

069  3E 

26942 

00000000 

HFX 

0 

332 

06940 

26944 

00000000 

HEX 

0 

333 

06942 

26946 

0000PF  00 

HFX 

0OO08E0O 

334 

06944 

26948 

00019100 

HFX 

O0O191O0 

33S 

06946 

26960 

00029100 

HE  X 

0O029100 

336 

06948 

86952 

OOF  49100 

HEX 

00F491O0 

337 

0694  A 

26954 

00070100 

HEX 

0007D100 

338 

0694C 

86956 

00009100 

Hf  X 

00009100 

339 

0694F 

26968 

00O08F  00 

HF  X 

O00ORE00 

340 

06950 

£6960 

00000000 

HEX 

0 

341 

06962 

26962 

00000000 

HFX 

0 

342 

06964 

26964 

00000000 

HEX 

0 

343 

06956 

26966 

OOO0OOOO 

HEX 

0 

344 

06958 

26968 

OOFEO00O 

HEX 

0OFEO0O0 

345 

0695A 

26970 

00000000 

HEX 

0 

346 

0695C 

26972 

OOOOOO0© 

HEX 

0 

347 

0696E 

2697  4 

00000000 

HEX 

0 

348 

06960 

26976 

00000000 

HEX 

0 

349 

06962 

89979 

00038E00 

HEX 

00038FOO 

350 

06964 

26980 

00045100 

HEX 

00045100 
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351 

069F.6 

26982 

00006 1 00 

HEX 

00005100 

362 

06968 

2699  4 

00r 19100 

HEX 

OOF  19100 

3S3 

0696  A 

26986 

00006 1 00 

HEX 

00005100 

354 

0696C 

26988 

00045100 

HEX 

00046100 

355 

0696F 

26990 

000981 00 

HEX 

0003RF00 

355 

06970 

26992 

00000000 

HEX 

0 

357 

06972 

26994 

00000000 

HEX 

0 

358 

0697  4 

26996 

00000000 

HEX 

0 

359 

06976 

26998 

00000000 

HEX 

0 

3€»0 

06978 

27000 

00FF0000 

HEX 

oer  E0000 

361 

0697A 

27002 

00000000 

HEX 

0 

362 

0697C 

27004 

00000000 

HEX 

0 

363 

0697E 

27006 

00000000 

HEX 

0 

364 

06980 

27088 

00000000 

HEX 

0 

365 

06982 

270  10 

00038F  00 

HEX 

O003RF  00 

366 

06984 

27012 

00045 1 00 

HEX 

00045100 

367 

06986 

2701  4 

00005100 

HEX 

00005100 

368 

06988 

27016 

00F091 00 

HEX 

00F0910O 

369 

0698 A 

27018 

0001 1 1 00 

HEX 

0O01 1 1 00 

370 

069 P6 

27020 

00021 100 

HEX 

00021 100 

371 

0698E 

27022 

0007OF 00 

HEX 

0007OL00 

372 

06990 

27024 

00000000 

HEX 

0 

373 

06992 

27026 

00000000 

HEX 

0 

374 

06994 

27028 

00000000 

HFX 

O 

375 

06996 

270  10 

00000000 

HI  X 

o 

376 

06998 

270  <2 

001  r 0000 

HFX 

O0EF000O 

377 

0699A 

270  34 

00000000 

HFX 

0 

378 

0599  r 

270  36 

00000000 

HEX 

0 

379 

0699F 

270  38 

00000000 

HFX 

0 

380 

069A0 

27040 

00000000 

HFX 

O 

381 

069A2 

27042 

000031 00 

HEX 

000081 00 

382 

06')  A 4 

27044 

0001 91 00 

HEX 

000191 00 

383 

069A6 

27046 

000091 00 

HEX 

00009100 

38  4 

069A8 

27048 

001  09100 

HEX 

001 091 00 

385 

069AA 

27050 

00009100 

HEX 

00009100 

386 

069AC 

27062 

00009 l 00 

HEX 

000091 O0 

387 

069AF 

2706  4 

0001 CF00 

HFX 

00016100 

388 

069P0 

27856 

00000000 

HEX 

0 

389 

069B2 

27058 

00000000 

HEX 

0 

390 

069R4 

27060 

00000000 

HEX 

0 

391 

069B6 

27062 

00000000 

HEX 

0 

392 

069P8 

27064 

00F 1 0000 

HEX 

O0FF0000 

393 

069PA 

27066 

00000000 

HEX 

0 

394 

069BC 

27068 

00000000 

HEX 

0 

395 

069BE 

27070 

00000000 

HEX 

0 

398 

069C0 

27072 

00000000 

HEX 

0 

397 

069C2 

876  74 

00000F  00 

HEX 

00000r 00 

398 

0696  4 

27076 

0000 1 1 00 

HEX 

00001 100 

399 

06966 

27078 

00001 1 00 

HEX 

00001 1 O0 

400 

06968 

27080 

001  01  10A 

ASSCL 

HEX 

OOI  01  Io0 

401 

069CA 

27082 

0000 1 1 00 

HEX 

88881 100 

402 

069CC 

8 '"*4 

00001 1 O0 

HEX 

0000 1 1 0O 

403 

0 69'  1 

27086 

000001  00 

HEX 

000001  00 

404 

• 

4 05 

069D0 

870ft  ft 

00065600 

Ml  X 

00055600 

406 

069D2 

27090 

00O56500 

HEX 

OOM565A0 

407 

069D4 

2709, 

00056'  00 

ME  X 

00055500 

408 

069D6 

27094 

00056'  00 

HEX 

00066500 

409 

069B8 

8 7888 

00055500 

HEX 

00055500 

410 

06 9 DA 

27098 

00055500 

HEX 

00066600 

411 

069DC 

00065600 

HEX 

00065500 

412 

069DE 

00065500 

HEX 

00055500 

413 

069E0 

27104 

00065500 

HEX 

00066600 

414 

069E2 

27106 

00O655O0 

HEX 

00056600 

415 

069E4 

27108 

00056500 

HEX 

00056600 

418 

069F6 

271  10 

00066500 

HEX 

0006660 0 

417 

069F8 

271  12 

00066500 

HEX 

00056500 

418 

069E  A 

27114 

00066500 

HEX 

00065600 

419 

069EC 

271  16 

00065500 

HEX 

00065600 

420 

069FF 

27118 

00065500 

HEX 

00065600 

v 
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LINE  AB5 

APPPF 

r.s  in*7 

>Tf  ApF 

SOURCE  6 

TATEtlf  NT 

421 

0691  O 

271  20 

00065 

*.00 

HI  X 

0O0S66O0 

422 

069F  2 

27122 

0AO55 

600 

Hi  X 

00055500 

423 

0F.9F  4 

27124 

00065600 

HEX 

0OO556O0 

42  4 

069?  6 

27126 

00065 

*.O0 

HI  X 

0AO666O0 

425 

069?  8 

27 1 28 

00065 

600 

H?  y 

000'  7 7 ,c»0 

426 

0691  M 

271  1 A 

000*7, 

600 

HI  /. 

OAO*  7 7,00 

4R7 

069?  C 

271  12 

00066 

600 

nr  x 

0006*7  OO 

428 

069?  ? 

271  i4 

000*7, 

600 

me  y 

00066600 

429 

06A00 

271  '■(> 

00 066 

600 

H?  X 

00056600 

43A 

06A02 

271 

0006  6 

600 

HEX 

00056600 

431 

06  A A 4 

271  4 A 

000*7. 

600 

nr 

00066600 

4 32 

06A06 

27142 

0006  6 

600 

HFX 

00066600 

433 

06A0R 

27144 

00065 

600 

MF.y 

00056600 

434 

06  A A A 

46 

00055 

600 

HFX 

00066600 

435 

06A0i 

27148 

00056 

500 

he  y 

00066600 

4 36 

A6AA? 

271  '.A 

00066 

600 

h?  x 

00066600 

4 37 

AAA  1 A 

2 .'1  ' S 

00066 

600 

he  x 

00065600 

438 

06 A 1 i ' 

37154 

00066 

600 

HE  X 

00O6660O 

4 39 

06A1  4 

27  156 

00  A*  7. 

6O0 

ME : 

0006*7 ,00 

440 

0 6 A 1 6 

2 7 158 

00056 

7,00 

HE  X 

00055500 

441 

A6A  1 R 

271  6A 

00066 

,600 

Hl-X 

00055600 

442 

06A  1 A 

37163 

00O56 

,600 

Hf  X 

00055600 

4 4? 

06AIO 

27164 

0AO56 

,600 

HEX 

00055500 

444 

06  A 1 F 

27166 

000*7, 

600 

H?  X 

00056  >00 

446 

06A20 

271  68 

AOO665A0 

HEX 

00055600 

446 

06A22 

271  7A 

09055500 

Hr  X 

00O666OA 

447 

06A2  4 

27172 

00066500 

HFX 

00055600 

448 

06A26 

27  1 7 4 

00066 

600 

nr  x 

00055500 

4<9 

06A2R 

27176 

000566O0 

HEX 

0O05550A 

450 

06A2A 

371  78 

00066 

600 

HEX 

000556O0 

451 

06ARA 

271  HA 

00066 

600 

HEX 

00056600 

463 

06A2E 

27182 

00066 

6O0 

HFX 

00065600 

453 

06A30 

27184 

000*7 

500 

HE  X 

00066600 

454 

06A3? 

27186 

00 06 6 

500 

HFX 

00O655OA 

455 

06A94 

2712  R 

A0O66 

600 

HFX 

O0055600 

466 

06A36 

371 90 

0006*. 

600 

hf  y 

00056500 

457 

06  A 18 

27192 

00066 

600 

HFX 

00055500 

468 

06A3A 

27194 

OOA66 

600 

HEX 

0O0555O0 

46V 

06A9' 

27  196 

00065 

500 

HEX 

00055600 

460 

A6A3E 

27198 

00056600 

HEX 

00065500 

461 

A6A4A 

i >7300 

000*7, 

600 

HE  X 

00055500 

462 

06A47 

27202 

00056 

600 

Hf  X 

00055600 

46  1 

06A4  4 

37304 

00056 

600 

HEX 

00056600 

464 

A6A4F. 

27206 

00066 

600 

HFX 

00056600 

465 

A6A4P 

, ■ 7308 

00066 

600 

HFX 

00055500 

466 

06A4A 

27210 

00055600 

HEX 

00055500 

467 

06A4« 

3 *313 

00066 

600 

Hr  X 

00055500 

46H 

A6A4? 

3731  4 

00056 

600 

MF  X 

OAO5S600 

469 

470  06A6A 

471  0606, ' 

472  06A6  4 
479  O6A66 
47?  0GA66 
474  06A69 
4 7S 

476  A6A6A 

477  0.,A*7 
4 7R  06A6F. 

479  06  non 

480  06A62 
4 R 1 

482  0606  4 
48  9 06A6C, 
4R4  0606  7 
4R4  06A68 
4 85  0606  A 


* 


27316 

6C 609490 

5TRTPT  l.PV 

1 2.  QI.UPTN 

27218 

14640000 

LAE 

O , 1 3 . I 

27320 

06F  8 

LXA 

1 3 

V,‘1 

0700 

27333 

60620002 

IMP 

1 2 . 2 . M 

2722  4 

1 r 6A9  490 

STX 

12 . OLBPTN 

t TPAN5I  I-'  THE 

nROMMF NT6 

37276 

60  230006 

LDX 

4 UAPC.X2- 

27228 

I 66POOO0 

XFER 

LPA 

0,4.1  < 

378  10 

9F  009?  OO 

5TA 

ARGL6T  4 

27233 

6f  3 ?0002 

INN 

4 ,2,M 

2 7294 

64906137 

JIJ 

XFER 

27296 

| 400  9?  O A 

5TRT 

LDO 

A6rD 

2 ’238 

690  4 

JL 

* ♦ 4 

373  19 

A7AA 

37240 

If.  0067 DR 

STA 

A6PDIN 

27247 

1 40067DR 

LDA 

A5P0IM 

PUT  ADDR  OF  JS4P  INTO  XR12 
OBTAIN  STRTING  LOC  OF  THE  ARGUMENT  LIST 

MOniFV  TUF  RF TURN  ADDR 

a.n 
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•486 

A6A6C 

27244 

9 40067 DA 

MLF 

PLPKT 

487 

06A6E 

27246 

0400 

CFX 

•488 

A6A6F 

27247 

A7AA 

488 

A6A7A 

27248 

Af  AA67 DC 

ADI. 

M5D 

489 

A6A72 

27250 

A 4020000 

ADIJ 

0 . M 

490 

06A74 

87252 

08  41 

SLL 

1. 

491 

A6A75 

272S  » 

0 700 

491 

06A76 

27254 

A40O  ir  02 

A Dll 

SCLGTM 

498 

A6A78 

27256 

3C0A1F  1 4 

STA 

TEMP 

493 

06A7A 

27258 

3400A96R 

LAF 

ASSCL 

494 

0 6 A 7 C 

2726A 

A6C8 

LXA 

9 

49S 

06A7D 

27261 

0700 

49S 

06A7E 

27268 

6C493E 1 4 

IHN 

9.  TEMP 

498 

06AR0 

27864 

■*4008000 

LAE 

TVRSTR 

497 

A6ARR 

87266 

06C0 

LXA 

8 

498 

A6A83 

27267 

0700 

498 

06A84 

27268 

6C403E06 

IMP 

8, SCLSA 

499 

06A8P 

87270 

60803009 

LDX 

4. 90LQTH 

SA0 

A6A88 

27272 

6C 830A01 

INN 

4 , 1 , M 

5A1 

A6A8A 

27274 

1 4009486 

LDA 

ONES 

SAG 

ACA8C 

2727b 

3C  400000 

5TA 

A.  8 

503 

AfiARF 

27278 

1 448000A 

ABPDLR 

lda 

A 9 

604 

06A90 

2728A 

C 4 4O0000 

LOP 

0 . 9 

60S 

06A92 

87888 

30400000 

STA 

0 . R 

506 

A6AQ4 

2788  4 

6'  4A0008 

I MP 

0,8. M 

SA7 

A6A96 

27286 

fj'  420010 

I MP 

8. 16,11 

SAW 

06A98 

87288 

6CGJ0O01 

HIM 

4.  1 ,M 

509 

06A9A 

a?890 

64306A8F 

JU 

ASPDLP 

510 

ASAnr 

87292 

1 400*4486 

LDA 

ONES 

SI  1 

A6m9F 

87294 

h'  400000 

STA 

0 , 9 

S 1 2 

06  AAA 

87896 

3400  O00 

1 AF 

TVP5TP 

SI  1 

06  A AG 

27298 

As*  i) 

LXA 

P 

514 

A6AA  1 

87899 

07A0 

SI  4 

06AA4 

27  )A0 

e>(  40  04 

IMP 

P.P F MKSA 

SI  6 

A6AA6 

87  M2 

1 4006 7 PE 

REFMK 

LDA 

OSPFMh 

SIS 

06  A AS 

2 7 3A4 

< 4400000 

LOP 

0.3 

S 1 7 

A6AAa 

87  I0< 

0 400000 

STA 

0. 8 

SIR 

06AAC 

273A8 

74009490 

PTA 

CiLBRTN 

519 

END 

XR9  • ABS  STRTINO  ADDR  WITHIN  ASSCL 


INCREMENT  TO  THE  SCALE  STARTING  ADDR 


a r props 
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INE 

AB6  ADDRESS 

INSTCODE 

SOURCE 

STATEMENT 

1 39 

* COMPASS  -- 

SUBROUTINE 

I 40 

* 

141 

00002 

2 

NARGX2 

SFTD 

2 

1 42 

064  32 

25650 

OPG 

COMPASS 

143 

06432 

25650 

0400949C 

PTR 

GLBRTN 

144 

064  3 4 

25652 

64 306? 4 A 

JGU 

STRTPT 

1 45 

* STORAGf  FOR 

XEER  OE  Al 

146 

0 3E00 

15872 

HDG 

F QU 

APGLST 

14? 

03E  1 4 

15892 

DSPL 

EOU 

TEMP 

1 4R 

03E  16 

15894 

B05PL 

eon 

TEMP * P. 

143 

081  0O 

33024 

SCLPOS 

EOU 

TVRSTP*  21 

ISA 

06436 

25654 

000O0000 

HDG  I N 

DEC 

0 

1S1 

064  38 

25656 

43400000 

THPTV2 

DFC 

32.0  ‘ 

1 52 

0641A 

25658 

41599999 

K 1 

DFC 

2 . 8 

153 

0643C 

25660 

80000000 

MSB 

HEX 

80000000 

154 

t 

155 

* 

156 

t 

157 

0643E 

25662 

071 C7000 

HDGSCL 

HEX 

071C7O00 

158 

06440 

25664 

08A8RH00 

HF.X 

08A28800 

159 

06442 

25666 

0O32R800 

HEX 

O0828S00 

1 60 

06444 

25668 

030C8820 

Hr  X 

O30CPS2O 

161 

06  446 

25670 

00388880 

Hf  >: 

00328820 

162 

06448 

25672 

08A23880 

HEX 

08A28820 

163 

064  4 A 

26674 

071 07020 

HEX. 

071C702O 

164 

0644C 

25676 

00000020 

HEX 

00000020 

165 

06441 

25678 

00080080 

HEX 

00030020 

166 

06450 

25680 

00030080 

HF  X 

00030O8O 

167 

* 

168 

064S2 

25682 

O003827C 

HEX 

0003827C 

1 69 

06  454 

25684 

0004464O 

nr  v 

00044640 

17A 

06456 

25686 

OO004 A40 

HE  X 

00004A4 O 

171 

06  458 

25688 

00819873 

HEX 

003 1 9878 

1 72 

0645A 

25690 

003061  04 

HE  X 

O030r,f  04 

179 

064'' 

25692 

00844204 

hf  x 

00  3 4 48.0  4 

1 74 

0646E 

25694 

00838878 

HE  X 

008.982 ,8 

175 

06460 

25696 

00300000 

nr  : 

OO8OOOO0 

176 

06462 

25698 

0030080 0 

Hf  ' 

0080O2OO 

177 

06464 

25700 

0030O800 

HI  V 

00800200 

1 78 

f 

179 

06466 

25702 

00000008 

HEX 

00000008 

180 

06468 

25704 

00000003 

HEX 

0O0O0OO9 

181 

06  46 A 

25706 

00000002 

HF  X 

0OQ00002 

182 

06466 

25708 

080080O2 

nr  X 

03008008 

183 

0646F 

25710 

08008002 

HEX. 

08008002 

184 

06470 

25712 

08002008 

HEX 

' 08002008 

185 

06472 

25714 

08002002 

HEX 

08002OO2 

186 

06474 

25716 

08002000 

HF  X 

08008000 

187 

06476 

25718 

0RO02O00 

Hf  X 

08008000 

188 

06478 

25720 

08002000 

HF  :< 

03002000 

189 

t 

190 

0647A 

25722 

20000 000 

HEX 

.10000000 

191 

0647C 

25724 

20000000 

HEX 

80000000 

192 

0647E 

25726 

A0000000 

HF.X 

A0000000 

193 

06480 

25728 

A0020O08 

HEX 

A008OO08 

194 

06  482 

25730 

60080008 

HF  X 

60020008 

195 

064R4 

25792 

20020008 

Hf  X 

80020008 

196 

06486 

25734 

2002000R 

HEX 

8008.0008 

197 

064e8 

85736 

0008000R 

HEX 

00020008 

198 

0648A 

25738 

80080008 

HEX 

80020008 

199 

0648C 

25740 

80020008 

HEX 

80020008 

200 

* 

201 

0648F 

26742 

009f  0000 

HEX 

009F  0000 

888 

06490 

25744 

01900000 

HEX 

01900000 

201 

06  492 

25746 

00900000 

HEX 

00900000 

204 

06494 

2S748 

009E008O 

HEX 

009E0080 

205 

06496 

25760 

00810080 

HEX 

O0810O30 

206 

06498 

25752 

00810080 

HEX 

00810080 

207 

0649A 

25754 

01 DE00R0 

HEX 

01 DE0O80 

208 

0649C 

25756 

00000080 

HEX 

0O000O80 

209 

06491 

25758 

00200080 

HEX 

00800080 

SUBROUTINE  TO  GENERATE  A HORIZONTALLY  MOVING  COMPASS  TAPE 
P THE  NO.  OF  ARGUMENTS  (TIMES  P)  TO  BE  XEFRFD 


STORAGE  LOCATION  FOR  THE  INPUT  HEADING 
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I 


at  i $ 


21c? 

064A2 

25762 

00001  380 

HEX 

000OE 380 

p n 

064A4 

25764 

0001  1 140 

HEX 

0001 1 4 40 

21  4 

064A6 

25766 

0O00  1 <1-10 

HEX 

00001 440 

2 1 S 

0».4AB 

25763 

02006440 

HF  X 

08006440 

816 

064AA 

25770 

02001 440 

hex 

0200 1440 

817 

0640' 

25772 

0201 1410 

HI  X 

0,-01  1 4 40 

213 

064A1 

25774 

0200T  <80 

HLX 

O8O0E  3f«0 

21* 

06  4 BO 

25776 

02  lOOOOO 

HEX 

080O00OO 

220 

064B2 

25778 

02000800 

HEX 

02000800 

221 

064B4 

25780 

0« '000800 

HEX 

O800O8*  >0 

222 

* 

2 23 

064B6 

25782 

00000009 

HEX 

00O0O00** 

224 

064B« 

257«4 

000000 1 9 

HEX 

000000 l 9 

22S 

06  4 BA 

25786 

00000029 

HF  X 

00000029 

226 

06  4 PC 

25788 

20002049 

HEX 

20008040 

227 

064PF 

25790 

20O0807C 

HEX 

2O00807C 

228 

064C0 

25792 

200O8008 

HEX 

20008008 

229 

064C2 

25794 

20005009 

HEX 

20008009 

230 

064C4 

25796 

20008000 

HEX 

80002000 

231 

064C6 

25798 

20008002 

HEX 

20008008 

2 32 

06  40  8 

25800 

20008002 

HEX 

200080 «2 

233 

* 

234 

064CA 

25802 

r 0OH000O 

HEX 

F 0000000 

23S 

064CC 

85884 

00000000 

HEX 

00000000 

236 

064CE 

25806 

00000000 

HFX 

0O000000 

237 

0G4D0 

25808 

E 0080020 

HEX 

F.  0080020 

238 

064D2 

25810 

1 0080020 

HEX 

1 0080080 

239 

064D4 

85812 

1 0080020 

HEX 

1 OO8008O 

240 

064D6 

2681  4 

F 0080020 

HEX 

F 0080020 

241 

064D8 

25816 

00080080 

HEX 

00080020 

242 

06  4 DA 

2SB18 

O0080O2O 

HEX 

00080020 

24  3 

A64DC 

85820 

000P0O2O 

HEX 

000R008O 

244 

* 

24S 

064DE 

25822 

0f 38000O 

HEX 

OF  380000 

246 

064E0 

26824 

1 1 440000 

HEX 

1 1 44O00O 

247 

064E2 

25826 

1O440OOO 

HEX 

1 0440000 

24H 

064E4 

25828 

16440200 

HEX 

164402OO 

249 

064E6 

258  30 

19440800 

HEX 

1 9440800 

250 

064E8 

25832 

1 1 440800 

HEX 

1 1440200 

25 1 

064EA 

25834 

0E  380200 

HEX 

0E38O20O 

2S2 

064EC 

26836 

00000200 

HCX 

00000200 

2S3 

064EE 

25838 

00800200 

HEX 

008OO80O 

PS  4 

064TO 

25840 

00800200 

HEX 

00800800 

2SS 

* 

256 

064E2 

25842 

0007DF 00 

HEX 

O0O7DE 00 

857 

064T4 

25844 

00006000 

HEX 

00006000 

8S8 

064T6 

868  4 6 

00009000 

HEX 

00009000 

259 

06  4F8 

85948 

0801 1 E0O 

HEX 

0801 1 f 00 

260 

064F  A 

25850 

08010100 

HEX 

08010100 

261 

064FC 

25852 

08080100 

HEX 

08020100 

26  2 

064EE 

25854 

0P021F0O 

HEX 

08021  TOO 

26  3 

06S0O 

25856 

08000000 

HEX 

08000000 

264 

06502 

25858 

08008000 

HEX 

02002000 

26S 

06S04 

25860 

08008000 

HEX 

08002000 

266 

* 

267 

06S06 

25862 

OOO0O0  3E 

HEX 

O0000O3F 

268 

06S08 

- •.  4 

00000020 

HEX 

00000020 

269 

06S0A 

! ' 6 

00000020 

HEX 

00000080 

270 

0650C 

25868 

800200  18 

HEX 

80020038 

271 

O660E 

26870 

80080020 

HFX 

R0080O80 

272 

06S 1 0 

25872 

80020020 

HEX 

80020080 

273 

065  1 2 

26374 

800200  IF 

HEX 

800200 3E 

274 

06S1  4 

25876 

8 00800O0 

HEX 

8O080OO0 

275 

065 1 6 

25878 

80080008 

HEX 

80080008 

276 

06S1  8 

2SP80 

80020008 

HEX 

8OO20008 

277 

* 

278 

0651  A 

26882 

0O000000 

HEX 

0OOO0OOO 

279 

06616 

26884 

0O000M0O 

HEX 

O00000OO 

2»0 

066  1 F 

25886 

00OO0000 

HEX 

00000000 

4 

1 
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281 

0CS20 

25888 

0080A080 

HEX 

00200080 

282 

06522 

25890 

00800080 

HEX 

00200030 

283 

06524 

25892 

00200080 

HEX 

00200080 

284 

06526 

25894 

0020O080 

HEX 

00200080 

285 

06528 

25896 

00200O80 

HEX 

00200030 

286 

06520 

25898 

00200080 

HEX 

00200020 

287 

0652' 

259O0 

00200080 

HEX 

00200080 

288 

* 

289 

0652E 

25902 

473E0O00 

HEX 

473E0000 

290 

0653O 

26904 

C8A00000 

HEX 

C8A00O00 

291 

06532 

25906 

48A00000 

HEX 

4RA00000 

292 

06534 

25908 

18BC0800 

HEX 

43BC0300 

293 

06536 

259 1 6 

48820800 

HEX 

43820800 

294 

06538 

25912 

48820800 

HEX 

48820800 

295 

06S3A 

25914 

E73C0800 

HEX 

E73C0800 

296 

0653C 

25916 

00000800 

HEX 

00000800 

297 

0653E 

25918 

0800O800 

HEX 

02000800 

298 

06540 

25920 

080O0800 

HEX 

02000800 

299 

* 

300 

065  42 

25922 

001 10700 

HEX 

001 1C7O0 

301 

0654  4 

25924 

00  )22R80 

HEX 

00322880 

302 

065  46 

85926 

00102380 

HEX 

00102880 

303 

06542 

25988 

801048R2 

HEX 

20104882 

304 

065  4 A 

25930 

801 08882 

HEX 

2O108832 

305 

0654i 

25932 

201 10382 

HEX 

301 10882 

306 

066  41 

25994 

20  3 PE  702 

HEX 

2O3BE702 

307 

066*. 0 

859  56 

20O00002 

HEX 

20000002 

308 

06562 

25938 

2O0080O2 

HEX 

20003O02 

309 

06554 

25940 

20008002 

HEX 

2O008 002 

310 

* 

31  1 

06556 

25942 

00000473 

HEX 

000A047 3 

312 

06558 

25944 

O0000C  8A 

HEX 

000O0r  pa 

313 

0655A 

25946 

000004OA 

HFX 

0000040A 

314 

0655C 

25948 

00080433 

HF  X 

00080433 

315 

0655E 

25960 

00080408 

HEX 

00080408 

316 

0656O 

25952 

00080488 

HEX 

00080488 

317 

06562 

25954 

00080F73 

HEX 

00080E73 

318 

06564 

25956 

000R0000 

HEX 

00030000 

319 

06566 

25953 

00080020 

HEX 

00080O20 

320 

06568 

26960 

00080020 

HEX 

00030020 

321 

* 

322 

0656A 

26962 

E 000000 1 

HEX 

E 000000 1 

323 

06560 

25964 

00000003 

HEX 

00000009 

32  4 

0656E 

25966 

00000001 

HEX 

0000000 1 

32S 

06670 

25963 

C 080020 1 

HE  v 

0030020 1 

326 

06572 

25970 

208O0201 

HEX 

2080020 1 

327 

06674 

25972 

20800201 

HF  X 

20800201 

328 

06576 

26974 

O030O203 

HF.  X 

O08002O J 

329 

06578 

26976 

00800200 

HEX 

00800200 

330 

0657A 

25973 

00300200 

HEX 

00300200 

331 

0657C 

25980 

00800200 

HEX 

O080020O 

332 

t 

333 

0657E 

25982 

3F 7O0000 

HEX 

3E700000 

334 

06680 

86984 

20880000 

HFX 

208B0000 

335 

06582 

25986 

20880000 

HEX 

20880000 

336 

06584 

26988 

3O8R2000 

HFX 

30882000 

337 

06686 

25990 

02882000 

HEX 

02882000 

338 

06688 

25992 

02882000 

HEX 

02882000 

339 

0658A 

85994 

BC702000 

•HEX 

BC702000 

340 

0668C 

25996 

00002000 

HEX 

00002000 

341 

0658E 

25998 

03002000 

HFX 

08002000 

342 

06590 

26000 

08002000 

Hr  X 

08002000 

343 

* 

344 

06592 

P6002 

00473E00 

HEX 

00473FO0 

345 

06594 

26004 

00C8A000 

HEX 

00C8A00A 

346 

06596 

26006 

00482000 

HFX 

004R20O0 

347 

06598 

26003 

804B3C0R 

HEX 

P04D3O08 

348 

0659A 

26010 

804C8208 

HFX 

804C8C0R 

349 

0659C 

26012 

80488208 

HE  H 

80488208 

350 

0659F 

26014 

P0F 73008 

HEX 

80E73C08 
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351 

066AO 

86016 

80000008 

HEX 

80000008 

358 

065A8 

86018 

80O20008 

HEX 

80020008 

353 

065A4 

86080 

80O20008 

HEX 

8002OOO8 

354 

t 

355 

065A6 

86088 

000001 C0 

HEX 

000001 C0 

356 

0ASA9 

86084 

00000880 

HEX 

00000220 

357 

065AA 

36086 

00000200 

HEX 

OO0002O0 

358 

065AC 

86028 

00800100 

HEX 

008001C0 

359 

06SAE 

860  <0 

00800O80 

HEX 

00800020 

360 

065P0 

860J8 

00r*0A280 

HEX 

00200220 

361 

065B8 

8603  4 

00800 1 00 

HEX 

00200100 

368 

066P4 

26036 

00800000 

HEX 

00200000 

363 

065P6 

860  18 

008000M0 

HEX 

OO200080 

364 

065P® 

36040 

00700080 

HEX 

00200080 

365 

* 

366 

065PA 

86042 

00000004 

HEX 

00000004 

367 

065  PC 

2*04  4 

O000000C 

HEX 

0000000C 

368 

06 5 PE 

86046 

00000004 

HEX 

OO0O0004 

369 

065C0 

26048 

08OO0204 

HFX 

02000804 

370 

065'  2 

86050 

02000804 

HEX 

02000804 

371 

065r  4 

86058 

08000804 

HEX 

O20O08O4 

378 

065C  6 

86054 

08P0020E 

HEX 

020008OE 

373 

06568 

26066 

0^000800 

HEX 

02O008O0 

374 

0656  A 

8606K 

020O0800 

HEX 

02000800 

375 

0^566 

26060 

08000800 

HEX 

02O008OO* 

376 

* 

377 

065CF 

8606? 

73F 00000 

HEX 

73E000O0 

378 

065D0 

86064 

8A0OO000 

HEX 

8A0000O0 

379 

0S5D2 

86066 

8A0O00O0 

HEX 

8A000O00 

380 

06604 

86068 

7BC02OO8 

HEX 

7BC080O2 

381 

065P6 

26070 

08208008 

HEX 

08208002 

388 

06608 

86078 

88808008 

HEX 

88808002 

383 

066  DA 

86074 

73C08O02 

HEX 

73C080O2 

384 

065DC 

86076 

00008002 

HEX 

00008002 

385 

06SDE 

86078 

80008002 

HEX 

20008008 

386 

06SE0 

260R0 

20008002 

HEX 

20008002 

387 

t 

388 

065E8 

26088 

0388F000 

HEX 

O383E000 

389 

065E4 

86084 

04591000 

HEX 

04591000 

390 

065E6 

86086 

00491 000 

HEX 

00491000 

391 

065E8 

86088 

00891020 

HEX 

00891020 

398 

065EA 

26090 

01091080 

HEX 

01091020 

393 

06SCC 

86098 

02091080 

HEX 

02091020 

394 

065EF 

86094 

07DCE020 

HEX 

O7DCE020 

395 

06SF0 

86096 

00O00O20 

HEX 

00000020 

396 

065 ra 

86098 

00080080 

HEX 

00080020 

397 

06SF4 

86100 

00080080 

HEX 

00080O20 

398 

* 

399 

06SF6 

86102 

0001C73E 

HEX 

0001C73E 

400 

065F8 

86104 

00082RA0 

HEX 

000288A0 

401 

065FA 

86106 

O0002OA0 

HEX 

00002OA0 

408 

065FC 

86108 

00304 1 3C 

HEX 

00804 13C 

403 

066FE 

86110 

00808202 

HEX 

008O8202 

404 

06600 

86118 

00810402 

HEX 

0081O402 

405 

06602 

86114 

0083FFBC 

HEX 

0083E1  BC 

406 

06604 

86116 

00800000 

HEX 

00800000 

407 

06606 

861  18 

00800200 

HEX 

00800200 

408 

06608 

86120 

00800200 

HEX 

00800200 

409 

* 

410 

0660A 

86188 

000000F0 

HEX 

00000OF0 

411 

0660C 

86184 

00000111 

HEX 

000001 1 1 

418 

0660E 

26126 

00000018 

HEX 

00000012 

413 

06610 

86128 

08008084 

HEX 

03002024 

414 

06618 

861  30 

08008047 

HEX 

08008047 

415 

06614 

861  32 

08002O80 

HEX 

03008080 

416 

06616 

261  3 4 

08OO? 1F0 

HEX 

08002  IF O 

417 

06618 

261  36 

08O02O00 

HEX 

08008000 

418 

0661  A 

261  38 

08008000 

HEX 

0R002O0O 

419 

066  1C 

86140 

08002000 

HEX 

08002000 

480  * 
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421 

066 1 f 

26142 

0F  A 00000 

HFX 

RF000O0O 

422 

06620 

2614-4 

91000000 

HEX 

91 000000 

423 

06622 

26146 

91000000 

HEX 

91000000 

424 

06624 

261  4 8 

91020008 

HFX 

01020008 

425 

06626 

26150 

D 1 020008 

HF  X 

D 1020008 

426 

06628 

26 1 62 

91020008 

HF  X 

91020003 

42? 

0662A 

26154 

8E02A008 

HF  X 

RF  020008 

428 

0662r 

26166 

00020008 

HEX 

0O020OO8 

429 

0662F 

26168 

80020008 

HFX 

80020008 

430 

06630 

26160 

80020008 

HFX 

90020008 

431 

* 

432 

06632 

26162 

1CFBF  000 

HEX 

1 CF  BE  000 

433 

06634 

26  164 

22820000 

HFX 

82820000 

434 

06636 

26166 

02820000 

HEX 

02820000 

4 35 

066  38 

26168 

04 r 3' 080 

HEX 

04F  3C08O 

436 

0663A 

26170 

08082080 

HEX 

08082080 

437 

0663C 

26172 

1 0O8208O 

HEX 

1 00820R0 

438 

0663F 

36174 

3Er3C080 

HFX 

3EF3C080 

439 

06640 

26176 

00000080 

HEX 

00000080 

4 40 

06642 

26178 

00200080 

HEX 

00200080 

441 

0664  A 

26180 

00200080 

HEX 

O0200080 

442 

* 

443 

06646 

26182 

0O002200 

HFX 

0O002200 

444 

06648 

36184 

00002200 

HI  X 

00002200 

445 

0664A 

26186 

00002200 

HEX 

00002200 

446 

0664C 

26188 

02002A00 

HEX 

02O02A0O 

447 

0664F 

26190 

02O02A00 

HEX 

02002A0O 

448 

06650 

261  92 

020O3600 

HEX 

02003600 

449 

06652 

26194 

02001 400 

HEX 

O20O14CO 

450 

06654 

26196 

02000000 

HEX 

02000000 

451 

06656 

26198 

02OO0800 

HEX 

O20008O0 

452 

06658 

26200 

0200080O 

HEX 

02000200 

453 

* 

454 

0665A 

26202 

O00001C7 

HEX 

000001 07 

455 

0665C 

26204 

000OO228 

HEX 

00000228 

456 

066SE 

26206 

00O00028 

HEX 

00000028 

457 

06660 

26208 

20008047 

HEX 

20008047 

458 

06662 

26210 

20O08O88 

HEX 

20008088 

459 

06664 

26212 

20008108 

HEX 

20008108 

460 

06666 

2621  4 

20O083E7 

HEX 

200083E  7 

461 

06668 

26216 

20008O00 

HEX 

20008000 

462 

0666A 

26218 

20O08002 

HEX 

20008002 

463 

0666C 

26220 

20008002 

HEX 

2000RO02 

464 

* 

465 

0666E 

26222 

3F  00O000 

HEX 

31 000000 

466 

06670 

26224 

A0000000 

HFX 

A0000000 

467 

06672 

26226 

A0000000 

HEX 

A000OO00 

468 

06674 

26228 

36080020 

HEX 

3C080O20 

469 

06676 

26230 

82080020 

HEX 

82080020 

470 

06678 

36333 

82080020 

HEX 

82O80020 

471 

0667A 

36334 

3C08OO20 

HEX 

3C080020 

472 

0667C 

26236 

00080020 

HEX 

00080O20 

473 

0667E 

26238 

00080020 

HEX 

00080020 

474 

06680 

26240 

00080O20 

HEX 

00080O20 

475 

t 

476 

06682 

26242 

71 r 70000 

HEX 

71C70OO0 

477 

06664 

26244 

RA288000 

HEX 

8A23R0O0 

478 

06686 

26246 

0A2880O0 

HEX 

0A28800O 

479 

06688 

26248 

32288200 

HEX 

32288200 

480 

0668A 

26250 

0A2882O0 

HEX 

0A28820O 

481 

0668C 

26252 

8A28°200 

HEX 

8A2R820O 

482 

0668E 

26254 

71C70200 

HFX 

7 1 C 70200 

481 

06690 

262 56 

00000200 

HEX 

00000200 

484 

06692 

26258 

00800200 

HEX 

00800200 

485 

06694 

26260 

00800200 

HEX 

00800200 

486 

* 

487 

06696 

26262 

000E27C0 

HEX 

000F27C0 

488 

06698 

26264 

001 16400 

HEX 

001 16400 

489 

0669A 

26266 

00012400 

HEX 

00012400 

490 

0669' 

26268 

08062780 

HEX 

08062780 
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491 

0669E 

26270 

08012040 

HEX 

08012040 

•492 

066A0 

26272 

081 12040 

HEX 

08112040 

•493 

066A2 

26274 

080E7780 

HEX 

08OE7780 

•494 

066A4 

26276 

08000000 

HEX 

O8OOO000 

495 

066A6 

26278 

080O200O 

HEX 

08002000 

496 

066A8 

26280 

08002000 

HEX 

08002000 

•497 

* 

498 

066AA 

26282 

000007  1C 

HEX 

000007 1 C 

•499 

066AC 

26284 

000008A2 

HEX 

00000602 

S00 

06CAE 

26286 

00000082 

HEX 

00000082 

soi 

066PO 

26288 

80O20 90C 

HEX 

8002O3OC 

S02 

066  82 

26290 

8O020O82 

HEX 

80O2O082 

503 

066B4 

26292 

800208A2 

HEX 

R0020RA? 

50  4 

066B6 

26294 

80O207 1C 

HEX 

800207  1C 

505 

066B8 

86296 

80020000 

HEX 

80020OA0 

506 

0AGRA 

26298 

80020O08 

HEX 

80020008 

S07 

066BC 

26  106 

P0020O08 

HEX 

80020008 

508 

* 

S09 

066BE 

26302 

70000001 

HEX 

7O000003 

S 1 0 

0660  0 

26  104 

88000004 

HEX 

880000O4 

51 1 

066C2 

26  306 

88000000 

HEX 

88000O00 

SIR 

066C4 

26  308 

8820008 1 

HEX 

88200081 

SI  3 

0660  6 

26110 

88200080 

HEX 

88200080 

SI  4 

066C8 

26312 

88,  *00084 

HEX 

88200084 

SIS 

066CA 

26914 

70200083 

HEX 

70200083 

S 1 6 

066CC 

26316 

00200080 

HEX 

002O008O 

S 1 7 

066CE 

26318 

00200080 

HE  X 

0020008O 

SIB 

066D0 

26320 

00200080 

HEX 

00200080 

S 1 9 

* 

S20 

066DR 

26322 

827C00O0 

HEX 

827C00OO 

SRI 

066  [■  4 

26324 

464OO000 

HEX 

46400000 

5RR 

066D6 

26326 

4 A 4 00000 

HEX 

4 A 400000 

523 

066D8 

26328 

92780900 

HEX 

92780800 

524 

0661>A 

26310 

SF 040800 

HEX 

5F  040800 

S2S 

066DC 

26332 

42040800 

HEX 

4204080O 

526 

066DF 

26394 

R2VPOR00 

HEX 

62780800 

527 

066E0 

26336 

00000800 

HEX 

00000800 

S28 

066E2 

26398 

0, >000800 

HEX 

02000800 

529 

066F  4 

26  940 

02000800 

Hf  X 

02000RO0 

S30 

« 

531 

066E6 

26342 

00022000 

HEX 

00022000 

532 

066E8 

26944 

0003CO00 

HEX 

000  12000 

533 

066F.A 

26946 

0O02AO00 

HEX 

0002AO00 

534 

066EC 

26348 

2002000 2 

HEX 

2O02AOO2 

535 

066EF 

26350 

20026002 

HEX 

20026002 

536 

066E0 

26352 

20022002 

HEX 

20022002 

537 

066F2 

26354 

20022002 

HEX 

20022002 

53B 

066F4 

80  160 

20000002 

HEX 

20000002 

539 

066F6 

26358 

20008002 

HEX 

20008002 

540 

066F  8 

80300 

20008002 

HEX 

2OO08002 

641 

t 

542 

066EA 

26362 

O000O0 -JF 

HEX 

000000QE 

543 

666F  C 

26364 

00000190 

HEX 

00000190 

544 

066EE 

26366 

00000090 

HEX 

000000Q0 

545 

06700 

26368 

000P009E 

HEX 

000R0O9F 

546 

06702 

26370 

00080081 

HEX 

00080001 

547 

06704 

26372 

00080081 

HEX 

00080081 

548 

06706 

26374 

000801 DE 

HFX 

000801 DE 

549 

06708 

26376 

00080000 

HEX 

00080000 

560 

0670A 

26378 

00080020 

HEX 

00080020 

55 1 

0670C 

26380 

00080020 

HEX 

00080020 

552 

* 

553 

O670E 

86308 

0O0O0000 

HEX 

00000000 

554 

06710 

26  384 

00000001 

HEX 

00000001 

555 

06712 

26386 

OO00000O 

HEX 

00000000 

556 

06714 

26388 

OO800200 

HEX 

00800200 

557 

06716 

80  190 

00800200 

HEX 

O080O2O0 

568 

06718 

26992 

00800201 

HEX 

00800, >01 

569 

0671  A 

2» • 134 

00800200 

HEX 

00800200 

560 

0671 C 

26  996 

O08O020O 

HEX 

OO80O2OO 

72 
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FOCAP-5  VIP. 03  PAOE  7 
LINF  ABf>  . ADDRESS  INSTCODE 


SOURCE  STATEMENT 


S61 

06711 

26  398 

0080O2O0 

HE  X 

00800800 

562 

563 

06720 

2640O 

00800200 

* 

HEX 

00800800 

564 

067S.? 

26402 

t 9800000 

HEX 

E 9800000 

S65 

06724 

26404 

1 440OO00 

HEX 

1 44O0O00 

S66 

06726 

26406 

t 4400000 

HEX 

l 4400000 

S67 

06728 

26408 

64402000 

HEX 

64402000 

568 

0672A 

26410 

1 4402000 

HEX 

1 4402000 

569 

0672C 

26412 

14402000 

HFX 

14402000 

570 

0672E 

26414 

E 38O2000 

HFX 

E 3802OO0 

571 

06730 

26416 

00002000 

HEX 

000O2O00 

S72 

06732 

26418 

08002000 

HEX 

08O02OO0 

573 

574 

06734 

26420 

080020O0 

* 

HEX 

08O02O0O 

575 

06736 

26422 

0009T000 

HF  X 

0009F0O0 

576 

06738 

26424 

00190000 

HEX 

00190000 

577 

0673A 

26426 

00290000 

HF  X 

00290OOO 

678 

06730 

26428 

804fir  008 

Hr  v 

80 4 9T OOP 

679 

0673E 

264  30 

R07C 1008 

HE  X 

8070 1 OWL 

580 

0674O 

264  32 

80081 008 

HEX 

8O0R1009 

581 

0674.: 

264  34 

30O9F 008 

HEX 

8O00I  00.3 

58  2 

0674  4 

264  >0 

80000008 

HI  X 

80000008 

583 

06746 

26  4.38 

80020008 

HEX 

8002O008 

584 

06748 

26440 

80020008 

HEX 

H0020O0H 

535 

586 


587 

0674A 

26442 

5C60949C 

STRTPT 

LDX 

1 2 , GL8PTN  PUT 

588 

0674*' 

264  4 4 

14640000 

LAF 

0.12.I  odta; 

589 

067  4F 

26446 

06E  8 

LXA 

1 3 

590 

0674F 

2644? 

0700 

590 

06750 

26448 

60620002 

IMP 

12. 2, M 

591 

06752 

26460 

1 P60949C 

5TX 

12.GLBRTN  MOD 

592 

* TRANSFER  THE 

ARGUMENTS 

593 

06754 

26452 

5C220000 

LDX 

4 , NARGX2- 2 , M 

594 

06756 

26454 

1663O000 

XFER 

LDA 

0.4.13 

595 

06758 

26456 

3E003E00 

STA 

ARSL9T. 4 

696 

0675A 

26458 

602 30002 

INN 

4.2.M 

697 

0675C 

26460 

6086 

JU 

XFER 

597 

0675D 

26461 

0700 

598 

0675E 

26462 

1 4003E00 

STRT 

LDA 

HDG  HDO 

599 

O6760 

26464 

6304 

JL 

*♦4  T9T  1 

600 

06761 

26465 

0 700 

600 

06762 

26466 

3C 0O64 36 

STA 

HDG  IN 

601 

0676  4 

26468 

1 4O06436 

LDA 

HDG  IN 

602 

06766 

264  70 

9 4006 4 30 

MLF 

K 1 

603 

06768 

26472 

3C00  3E  1 6 

STA 

BDSPL 

604 

0676A 

36474 

84006418 

Dvr 

THRTY2 

605 

0676C 

26476 

0400 

CFX 

A RE< 

606 

0676D 

26  47? 

0700 

606 

0676F 

26473 

3C00  3E 1 4 

STA 

D5PL 

607 

06770 

264P0 

1 4020000 

LDA 

0,M 

60S 

06772 

26482 

0805 

SLLD 

5 

609 

06773 

26483 

0700 

609 

06774 

26484 

AC00643C 

ADL 

MSB 

610 

06776 

26436 

A 4020000 

ADU 

0 ,M 

61  1 

06778 

26488 

06A0 

LXA 

4 

612 

06779 

26489 

0700 

612 

0677A 

26490 

1 4001E 1 4 

LDA 

DSPL 

613 

0677C 

26492 

D4020O0A 

MUL 

10.  M 

614 

0677E 

26494 

0500 

FAB 

615 

0677F 

26495 

06C8 

LXA 

9 

616 

06780 

26496 

5C  420000 

LDX 

8. 0.  M 

HDQ  < 360  ) 


NO.  OF  WHOLE  UORDS  DISPLACEMENT 


617 

618 
619 


* ROUTINE  TO  SHIFT  AND  TRANSFER  THE  HEADINQ  9CALE  INTO  THE  RASTER 

* XR9  • THE  STARTING  WORD  ACROSS  THE  STORED  SCALE 

* XR4  - SHIFT  COUNT 


i 


T 
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LINE  AB'J  ADDRESS  INSTCODF  SOURCE  STATEMENT 


620 

* XR8 

I - RASTER  IJORD  COUNTER 

621 

06782 

26498 

1448643E 

SCLOOP 

LDA 

HDGSCL.9 

622 

06784 

26S00 

54486452 

LDB 

HDGSCL+20 , 9 

621 

06786 

26S02 

0A00 

SLLD 

0 , 4 

62-4 

06787 

26SA3 

0700 

624 

06788 

26504 

04408102 

LOR 

SCLP0S42.8 

62S 

0678A 

26506 

30408102 

ST  A 

5CLP0642.8 

626 

06  780 

26508 

6O4A0O02 

IMP 

9, 8.  M 

627 

067PE 

26610 

60420010 

IMP 

8, 16, M 

628 

06790 

26512 

2 4 4 300A0 

I CL 

8, 160, M 

620 

06792 

8651  4 

6004 

JU 

NXUC 

620 

0679  3 

265 1 5 

0700 

630 

06794 

266  1 6 

6092 

JIJ 

SCLOOP 

631 

06795 

26517 

0700 

611 

06796 

26618 

6C43009F 

NXUC 

IMN 

8. 158. M 

632 

06798 

26520 

244300OC 

I CL 

8, I2.M 

633 

0679A 

26522 

6004 

JU 

RFMK 

633 

0679B 

26523 

• 700 

634 

•679C 

26524 

609  A 

JU 

9CL00P 

635 

* 

636 

0B7BD 

aflsas 

636 

0679E 

26526 

5C420O00 

RFMK 

LDX 

8, 0,M 

637 

067A0 

26528 

5C22000C 

LDX 

4. 12. M 

638 

067A2 

26530 

1 4006430 

RELOOP 

LDA 

MSB 

639 

067A4 

86538 

C440R1 B8 

LOR 

SCLPOSM84.0 

6 40 

067A6 

865  M 

304081 B8 

STA 

SCLPOS+ 184,8 

641 

067A8 

26536 

6C42001 0 

IMP 

8, 16. M 

642 

067AA 

26518 

6C 2 30002 

IMN 

4 , 2,  M 

642 

067AC 

26540 

60PA 

JU 

PE LOOP 

641 

06  7 AD 

26541 

0700 

644 

067AE 

26542 

74009490 

RTA 

GLBPTN 

6 45 

END 

A ERPOFS 


74 


FOCAP-S  V10.03  PAGE  1 
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139 

* VSCALF  -- 

VERTICAL  SCALE  SUBROUTINE 

140 

* 

141 

00008 

8 

NAPGX2 

SETD 

8 THF  NO.  OF  ARGUMENTS  (TIMES  P>  TO  RF  XFIRED 

1 42 

06AAF 

27310 

ORG 

VSCALE 

1 41 

06AAF 

273t  0 

0400949C 

PTR 

GLBPTN 

144 

06AH0 

27312 

64306AB6 

JGU 

STRTPT 

14S 

* STORAGE  FOR  Xf EP  OF  ARGUMENTS  INTO  THE  ROUTINE 

146 

03FOA 

15872 

HPOS 

EOU 

ARGLST  URD  COLUMN  NO.  OF  HORIZONTAL  POSITION  OF  SCALE 

147 

03E02 

15874 

VSCLC 

FOU 

ARGLST *2  RASTER  LINE  NO.  OF  SCALE  CENTER  MARK 

148 

03F.0  4 

15876 

VSPC 

EGU 

ARGLST *4  NO.  OF  RASTER  LINES  BETWEEN  SCALE  DIVISIONS 

149 

03E06 

15878 

VMRKS 

EOU 

ARGLST ♦ 6 TOTAL  NO  OF  SCALE  MARKS.  EXCLUDING  CENTER  MARK 

ISO 

* 

1S1 

06AB2 

2731  4 

00FFFE00 

LMAPK 

HF  X 

00EFEE00 

152 

06AB4 

37316 

000FF.000 

SWARK 

ney 

000rf.000 

153 

* 

154 

06AB6 

27318 

5C60949C 

STRTPT 

LDX 

12. GLBPTN  PUT  ADDR  OF  JS*2  INTO  XRt2 

155 

06AB8 

27320 

34640000 

LAE 

0,12.1  OBTAIN  STRUNG  LOC  OF  THE  ARGUMENT  LIST 

1 56 

0GABA 

27322 

06F8 

LXA 

1 3 

1S7 

06  ABB 

27  32  3 

0700 

1 57 

06ABC 

27324 

6C620002 

IMP 

12. 2. M 

158 

06ABF 

27326 

1 C60949C 

STX 

1 2 . GLBPTN  MOD  I F V THF  RETURN  ADDR 

159 

* TRANSFER  THE  ARGUMENTS 

16© 

06AC0 

27328 

SC220006 

LDX 

4.NARGXP-8.M 

161 

06AC2 

87  1 10 

1 6680O0O 

XF  FR 

LDA 

0.4.13 

162 

06A(  4 

27332 

3E0O  3F  00 

ST  A 

ARGLST . 4 

163 

06AC  6 

27334 

6C830002 

I MM 

4 , 2 , M 

164 

06AC8 

273  *6 

6086 

JU 

XFEP 

164 

06  AC  9 

27  3 37 

0700 

165 

t 

166 

06  AC  A 

273  33 

1 40O3F02 

LDA 

VSCLC 

167 

06  AC' 

27340 

0843 

SLL 

L.GUPL 

168 

06Ar  D 

27  341 

0 700 

168 

06ACE 

27342 

A4003E 00 

ABU 

HPOS 

169 

06  A no 

27344 

0841 

SLL 

1 A CONTAINS  TVRSTR  INDEX  OF  THE  SCALE  CENTER 

170 

06AP1 

27345 

0600 

LXA 

8 

171 

06ADP 

27346 

06C8 

LXA 

9 

173 

06AD3 

27347 

0700 

173 

06AD4 

87  148 

5C6A0000 

LDX 

1 3 , 0 . M 

173 

t 

174 

* COMPUTE  (RASTER  L.INF  SPAC  ING  ) f UPLX2 

17S 

06AD6 

27  360 

1 4003F04 

LDA 

VSPC  VSPC  CONTAINS  SPACING  IN  RASTER  LINES 

176 

06AD8 

27352 

0844 

SLL 

LGUPL+t 

177 

06AD9 

87  363 

0700 

177 

06ADA 

27  364 

3C003E04 

STA 

VSPC  VSPC  NOU  CONTAINS  SPACING  IN  TVRSTR  URDS 

178 

* 

179 

t PUT 

IN  THE 

SCALE  CENTER  MARK 

180 

06  A DC 

27366 

1 4408000 

LDA 

TVRSTR .8 

181 

06ADF 

27368 

C40O6AB2 

LOR 

LMAPK 

182 

06AF0 

87988 

3C408000 

STA 

TVRSTR . 8 

183 

* 

184 

* NOU 

PUT  IN 

THE  OTHER  SCALE  MARKS 

185 

06AER 

27362 

6C413r04 

LOOP 

INN 

n, VSPC 

186 

06AF.4 

87364 

6C483F.04 

IMP 

9. VSPC 

187 

06AE6 

27366 

14408000 

LDA 

TVRSTR. B 

188 

06AE8 

27368 

C40O6AB4 

LOR 

SMARK 

189 

06AFA 

67370 

3C  408000 

ST  A 

TVRSTR. B 

190 

06AEC 

27372 

14488000 

LDA 

TVRSTR. 9 

191 

06AEE 

87374 

C400COB4 

LOP 

SHARK 

193 

06AF0 

27376 

3C 488000 

STo 

TVRSTR. 9 

193 

06AF2 

2737% 

60  4 1 3E04 

I MM 

8 VSPC 

194 

06AF  4 

87388 

6C483E04 

IMP 

9. VSPC 

196 

06AF6 

2730a 

1 4^08000 

LDA 

TVR9TR.B 

196 

06  AF  8 

27384 

C400F.AB2 

LOP 

LMAPK 

197 

06AFA 

87388 

3C  408000 

STA 

TVRSTR. 8 

198 

06AEC 

27  388 

14488000 

LDA 

TVRSTR. 9 

199 

06AFE 

27390 

C40A6AB2 

LOR 

LMARK 

300 

06B0A 

27392 

3C  488000 

STA 

TVRSTR. 9 

301 

06B02 

27394 

6C6A0004 

IMP 

13. 4. M 

203 

06B04 

87 186 

2469'IF  06 

I CL 

13. VMRKS  VMRKS  • NO.  OF  SCALE  DIVISIONS 

203 

06B06 

27398 

7400949C 

RTA 

GLBPTN 

204 

06BM8 

27400 

60A6 

JU 

LOOP 

205 

06B09 

27401 

0700 

20S 

END 

0 £ PROPS 
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*39  * HSCALE  - HORIZONTAL  SCALE  SUBROUTINE 

140  * 


141 

00008 

8 

NAPGXR 

SFTD 

R THE  NO.  OF  ARGUMENTS  (TIMES  2)  TO  BF 

XFERFD 

142 

06812 

27410 

ORG 

V3SC  ALE 

143 

06B12 

27410 

0400949C 

PTR 

GLBRTN 

144 

06B14 

27412 

64106822 

JGU 

STRTPT 

14S 

* STORAGE  FOR 

XFFR  OF  ARGUMENTS  INTO  THE  ROUTINE 

1 46 

03E00 

15872 

VPOS 

EOU 

ARGLST  RASTER  LINE  NO.  OF  VERTICAL  POSITION 

OF  SCALE 

147 

03E02 

15874 

MSTPT 

FOU 

ARGLST iS  UDR  CLMN  NO  OF  THE  BEGINNING  OF  THE 

SCALE 

148 

03E04 

15876 

HMSK 

EQU 

ARGLST ♦ 4 MASK  NO.  THAT  DETERMINES  THE  NO.  OF 

SCALE  DIVISIONS 

149 

03E06 

15878 

H9IZE 

EOU 

ARGLST *6  UIDTH  OF  SCALE  IN  URD  COLUMNS 

1S0 

t 

1SI 

t STORAGF  FOR 

LOCAL  VARIABLES 

1 S2 

03F16 

15894 

MSK 

EOU 

TFMP*2  STORAGE  FOR  THE  SELECTF D MA5K 

t S3 

06B16 

27414 

00000000 

SCLMSK 

HEX 

0 

1S4 

06D1  8 

27416 

R0000000 

HEX 

80000000 

155 

06B1A 

27418 

80008000 

HEX 

80008000 

156 

06B1C 

27420 

8080R080 

HEX 

80808080 

157 

06B1F 

27422 

88888888 

HFX 

88888888 

158 

06B20 

27424 

AAAAAAAA 

HEX 

AAAAAAAA 

1 59 

* 

16A 

06B22 

27426 

SO60949C 

STRTPT 

LDX 

1 P. , GLPP TN  PUT  ADDR  OF  JS*2  INTO  XR12 

161 

06B24 

27428 

.34640000 

LAE 

f.ia.l  OBTAIN  STPTING  LOC  Or  THE  ARGUMENT  LIST 

162 

06B26 

274  10 

06F8 

LXA 

13 

163 

06827 

274  31 

0700 

163 

06B28 

274  32 

6C6P0002 

IMP 

12. 2. M 

164 

06B2A 

274  3 4 

1C60949C 

STX 

1 2 , GLPPTN  MODIFY  THE  RETURN  ADDR 

165 

* TRANSFFR  THE 

ARGUMENTS 

166 

0i,B2C 

27436 

5C220006 

LDX 

4 . NARGX2- 2 , M 

167 

06B2E 

27438 

1 6680000 

XFEP 

L DA 

0 4,13 

168 

0«.B  30 

27440 

7F  00  <F  00 

STA 

ARGLST. 4 

160 

06832 

274  42 

6C230002 

inn 

4 , 2.  M 

1 70 

06B34 

27444 

6 4 306 P2E 

J u 

XTF  R 

171 

* 

172 

06B36 

27446 

1 400'»F  04 

LDA 

HMSK 

173 

06B3R 

27448 

0841 

5LL 

1 

174 

06B39 

274  49 

06E8 

LXA 

13 

175 

06B7A 

27  460 

1 4686816 

LDA 

SCLMSK.  13 

1 76 

06P3C 

27452 

3r  00  IF  18 

STO 

MSK  *2 

177 

06B3E 

27454 

1 4686B1 4 

LDA 

SCLMSK  - 2. 13 

178 

06B46 

27466 

3C003F 1 6 

STA 

MSK 

179 

06B48 

27463 

1 4 00  3r  00 

LDA 

VPOS 

180 

06B44 

274».0 

0843 

SLL 

LGUF'L 

181 

06B45 

27461 

0700 

181 

06B46 

27462 

A400  0? 

ADU 

HSTPT 

182 

06048 

27464 

0841 

SLL 

1 

183 

06B49 

27465 

0600 

LXA 

8 

184 

06B4A 

27466 

06C8 

LXA 

9 

185 

06  B 4 FI 

27467 

0700 

185 

06B4C 

27468 

1 4003F06 

LDA 

MSIZF 

186 

06B4E 

27470 

0841 

SLL 

1 

187 

06B4F 

27471 

0700 

187 

06BS0 

27472 

E 402000? 

SBU 

2 , M 

1«8 

06052 

27474 

3C003E 1 4 

STA 

TEMP 

180 

06054 

27470 

60620002 

LDX 

la.a.M 

190 

06866 

274  78 

5C6A0006 

LOOP# 

LDX 

13, 6, M 

101 

00BS8 

27480 

5C203E14 

L00P1 

LDX 

4. TEMP 

100 

06B6A 

B7483 

10408006 

LDA 

TVR9TR*a,4,« 

193 

06BSC 

27484 

C40O6B18 

LOR 

SCLMSK 4 2 

194 

06B5E 

27486 

3E  408002 

STA 

TVRSTR42, 4, 8 

195 

06B60 

27488 

16488003 

LDA 

TVRSTR42 , 4 , 9 

196 

06D62 

27490 

C4006B1 8 

LOR 

SCI.M8K48 

197 

0CB6  4 

27492 

3E 488002 

STA 

TVPSTR42. 4 , 9 

198 

06B66 

27494 

16408000 

toopa 

LDA 

TVRSTR, 4 , 8 

199 

HVII 

274*36 

C 46036 16 

LOR 

MSK . 12 

800 

06H6A 

27498 

3E408H00 

STA 

TVRSTR ,4.8 

801 

06B6C 

27500 

16488000 

LDA 

TVRSTR. 4,9 

008 

06B6E 

2760a 

0460  3F  16 

LOR 

N9K. ia 

203 

06870 

27504 

3F  488000 

STA 

TVRSTR ,4.9 

204 

06B72 

27606 

6C23O002 

IMN 

4 . 2,  M 

206 

06  R 7 4 

27508 

6430».B66 

JU 

LOOPS 

206 

06B76 

276 1 0 

6f  4 30010 

IMN 

8 , UPLX2 , M 

207 

06B78 

87St* 

6C4A001 0 

IMP 

9 . UPLX2. M 

208 

06R7A 

27614 

6O6P0002 

IMN 

1 3 , 2 . M 

209 

06B7C 

27516 

643A6P58 

JU 

LOOP  1 

210 

06P7F 

27513 

60630002 

IMN 

12. 2. M 

21  1 

06R80 

2 7520 

64  30I-.P66 

JU 

Looro  **  errors 

212 

06RR2 

2752? 

7400149« 

RTA 

GLBRTN 

21  1 

END 
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* VBAR  --  VERTICAL  BAR  SUBROUTINE 


14 

27S3© 

27530  0400949C 
27532  64306B98 


NARGX2  SETD  14  THE  NO.  OF  ARGUMENTS  (TIMES  2)  TO  BF  XFERFD 

ORG  VBAR 

PTR  GLBRTN 

JGU  STRTPT 

* 

* STORAGE  FOR  ARGUMENTS  XFERED  INTO  THIS  ROUTINE 
VBAR  EQU  AROLST 

KABAR  EGU  ARGLST  *2 

KBPAR  EOU  ARGLST*4 

MPVB  EOU  ARGLST  *6 

BARSL  EOU  ARGLST 4 0 

VBUL  EOU  ARGLST* 10 

VBLL  EOU  ARGLST* 1 2 

t 

t STORAGE  FOR  LOCAL  VARIABLES  AND  PARAMETERS 


1S8R6 

27534  000000E0 
27536  00A00E00 
27538  00038000 
27540  00F. 00000 
27542  Of 00000O 


BARMSK  EOU 
BRCODE  HEX 
HEX 
HEX 
HEX 
HEX 


ARGLST ♦ 1 4 
000000E  0 
00000E00 
00038000 
00F00000 
0f  000000 


27544  5CG0949C 

27545  34540000 

27548  051  R 

27549  0700 

27550  6C 620002 
27552  1C60949C 

27664  SC22000C 
27556  156*0000 
27558  3E003E00 
27560  6C 230002 

27562  6086 

27563  0700 

27564  1 4003E08 

27566  0841 

27567  06C.0 

27568  1 4406B8E 
27570  3C003E0E 

27572  14003E04 

27574  0400 

27575  0500 

27576  6204 

27577  0700 

27578  AC009404 

27580  050O 

27581  08-*3 

27582  A4003E06 

27584  0841 

27585  0SC0 


14003E00 

6224 

0700 
FC003E0C 
6 306 

0700 

14003E00 

6004 

0700 
1 4003E0C 
94003E02 
0400 

0500 

6204 

0700 

AC020001 

0500 


STRTPT  LDX  1 2 , GLBRTN  PUT  ADDR  OF  JS*2  INTO  XR12 

LAE  0.12,1  OBTAIN  STRTING  LOC  OF  THE  ARGUMENT  LIST 

LX  A 1 3 

IMP  I 2, 2. M 

STX  12. GLBRTN  MODJFV  THE  RETURN  ADDR 

* TRANSFER  THE  ARGUMENTS 

LDX  4.HARGX2-2.M 

XFFR  LDA  0,4.13 

STA  APGLST.4 

IMN  4 , 2 , M 

JU  XFEP 

* COMPUTF  THE  BAR  CODE  UHICH  UAS  SELECTFD  AND  STORE  IT  IN  BARMSK 

LDA  DARSL 

SLL  1 

LXA  8 

LDA  BRCODE. 8 

STA  BARMSK 

* COMPUTE  THE  STARTING  RASTER  UORD  NO.  FROM  UHICH  THE  BAR  WILL  ORIGINATE 

LDA  KBBAR 

CFX 

EAB 

JG  PND 


SLL  LGUPL 

ADU  HPVB 

5LL  1 

LXA  8 

* CHECK  FOR  VBAR  WITHIN  RANGE.  RESCALE  IT.  AND  MODIFY  THE  INC  XR  INST  U1TMIM 
t THE  LOOP 

LDA  VBAR 

JG  POS 


VBAR 

LOCLL  *2 


LOCLL  LDA 
MLF 
CFX 
EAB 
JG 

ADI. 

RNDN  EAB 


77 
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206  06BD9  27609  06E8  LXA  13 

207  t 

208  * ROUTINE  TO  INSERT  THE  VERTICAL  BAR  INTO  THE  MATRIX 

209  06BDA  27610  14408000  BARNEG  LDA  TVRSTR , 8 

, 210  06 8 DC  27612  C4003E0E  LOP  BAPMSK 

211  06BDE  27614  3C408000  STA  TVPSTR , 8 

212  06BE0  27616  60420010  1 MP  8 . UPLX2 , M 

1 213  06RE2  27618  6C6B0001  IMN  13.1.M 

214  06BE4  27620  60«A  JU  BAPNEG 

214  06RFS  27621  0700 

2 1 5 06BE6  27622  74009490  PTA  GLRPTN 

216  * 

217  06BE8  27624  FC003F  0A  POS  SBT  VBUL 

218  06 BE A 27626  6206  JG  LOCUL 

219  06HEB  27627  0700 

219  06BEC  27628  1 4003L00  LDA  VBAP 

220  06PEE  276  <0  6004  JU  LOCUL  + 2 

221  06BEF  27631  0700 

221  06BF0  27632  14003E0A  LOCUL  LDA  VBUL 

222  06RF2  27634  94009480  MLF  MONF 

22.3  06BE4  27636  94003F.02  MLF  KABAR 

224  06BF6  27638  0400  CFX 

225  06BT 7 27639  0S00  FAB 

RSfi  06BFR  27640  6204  JQ  RNBP 

207  06BFO  27641  0700 

227  06BEA  27642  AC02O001  ADL  l.M 

228  06BFC  27644  0600  RNDP  EAB 

280  0ABFD  27646  06ES  LXA  13  XR13  CONTAINS  THE  INTEOER  MAGNITUDE  OF  THE  BAA 

» 

* POUTINE  TO  INSFRT  THE  VERTICAL  BAP  INTO  THE  MATRIX 
27646  14409000  BAPPOS  LDA  TVPSTP.9 

27648  C400  3E0E  LOP  BAPMSK 

27660  30408000  STA  TVP9TP.8 

?7hS2  60430010  IMN  8.UPL/2.M 

27664  6CSB0001  IMN  1.3.  l.M 

276S6  603A  JU  BAPPOS 

27667  0700 

27668  74000490  PTA  GLBRTN 

END 


0 r PROPS 


230 

231 

232  06 BEE 
231  06000 
294  06C02 
2.36  06^  A4 

236  06006 

237  06008 
237  06009 
29P  0600 A 
239 


T 
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139 

141 
M2 
M3 
144 
1 45 


eeeoE 

060  1 6 
06016 
06C  18 


14 

27670 

27670  0400949C 
27672  64306C84 


* VDOF 

* 

NAR0X2  6ETD 

ORG 

PTP 

JGU 

1 STORAGE  FOR 


VERTICAL  DEGREE  OF  FREEDOM  ( DOF ) SVMBOL  SUBROUTINE 


146 

O3EO0 

1 5872 

VDOF 

EOU 

147 

03E02 

1587  4 

KAVD 

EOU 

148 

03E04 

15876 

KBVD 

EGU 

149 

03E06 

1S878 

HPVD 

EOU 

1S0 

03E08 

15880 

VDSEL 

EOU 

1S1 

03E0A 

15882 

VDUL 

EOU 

152 

O3E0C 

15884 

VDLL 

EQU 

153 

* VERTICAL 

154 

06C1A 

27674 

00000002 

VDSVM0 

HEX 

163 

06C28 

27688 

80000000 

VDSVM1 

HEX 

172 

06C36 

27702 

FF  F F 0000 

VDSVM2 

HEX 

173 

06C38 

27704 

0000FFFF 

VDSVM3 

HEX 

174 

06C3A 

27706 

73C8B9CF 

VD5VM4 

HEX 

183 

06048 

27720 

7DE11138 

VDSVMS 

HEX 

192 

06CS6 

27734 

44E45F78 

VDSVM6 

HEX 

201 

0606  4 

27748 

F1CF045E 

VDSVM7 

HEX 

210 

06072 

27762 

SVMEND 

EOU 

211 

* 

212 

06072 

27762 

04006C 1 A 

SVMPTR 

PTR 

213 

06C74 

27764 

04006C28 

PTR 

214 

06C76 

27766 

04006C  36 

PTR 

215 

06C78 

27768 

04006C38 

PTR 

216 

06C7A 

27770 

O4006C3A 

PTR 

217 

06C7C 

27772 

040O6C48 

PTR 

218 

06C7E 

27774 

040O6C56 

PTP 

219 

06C80 

27776 

04006C64 

PTR 

220 

06C82 

27778 

040A6C72 

PTR 

221 

* 

222 

06084 

27780 

5C60949C 

STRTPT 

LDX 

223 

06C86 

27782 

3464O000 

LAE 

224 

06C8R 

27784 

06E8 

LXA 

22S 

06C89 

27785 

0700 

225 

06C8A 

27786 

60620002 

IMP 

226 

06C8C 

27788 

1C60949C 

STX 

227 

* TRANSFER 

228 

06C8E 

27790 

5C22000C 

LDX 

229 

06C90 

27792 

16680000 

XFER 

LDA 

230 

06C92 

27794 

3E003E00 

STA 

831 

06C94 

27796 

6C230002 

IMN 

232 

06C96 

27798 

6086 

JU 

232 

06C97 

27799 

0700 

833 

* ARGUMENTS 

834 

06C  98 

27800 

14003E08 

LDA 

23S 

060  9A 

27802 

0841 

SLL 

919 

eec9B 

27*03 

0600 

LXA 

917 

e«c9< 

27804 

34446072 

LAE 

919 

99  f 9f 

£7*0* 

06*  P 

LXA 

919 

•9'  94 

*7f#7 

e?#e 

919 

MCA# 

4 ’"99 

X ••  X 14 

STA 

9*9 

99 ' 99 

4'*9 1 • 

LAF 

99 

99  +0 

l*a 

•99 

Mk 

9 * 99 

99* 

9T9\  W I# 

I 4H 

9»  i»m. 

I UN 

f 999  91  t 

no 

14 

VDOF 
GLBRTN 
STPTPT 
XFER  OF 
ARGLST 
ARGLST+2 
ARGLST ♦ 4 
ARGLST46 
ARGLST+8 
ARGLST  fl0 
ARGLST  + 1 2 


THE  NO.  OF  ARGUMENTS  (TIMES  2)  TO  BE  XFERED 


ARGUMENTS 

SVMBOL 

SCALING 

SCALING 


INTO  THE  ROUTINE 

INPUT  <FL  PT  MAX  AnS  VALUE  - 1 
PARAMETER 
PAPAMETER 

URD  COLUMN  POS  OF  THE  POINTER 
SVMBOL  SELECT 
UPPER  LIMIT 
LOUER  LIMIT 
DEGREE  OF  FREEDOM  SVMBOL  STORAGE 
2 LEFT  POINTER  <<j 

80000000  RIGHT  POINTER  <>> 

FFFF0000  REF  MARK  - LEFT  SIDE  OF  SCALE 
0000FFFF  REF  MARK  -RIGHT  SIDE  OF  SCALE 
73C8B9CF  CRUISE  ALPHA  CHAR  DOT  ARRAV 
7DE11138  TRANSITION  CHAR  DOT  ARRAV 
44E45F78  HOVER  CHAR  DOT  ARRAV 
F1CF045E  BOB-UP  CHAR  DOT  ARRAV 
t END  OF  SVMBOL  STORAGE 

VDSVM0 

VDSYM1 

VDSVM2 

VDSVM3 

VDSVM4 

VDSVMS 

VDSVM6 

VDSVM7 

SVMEND 

12, GLBRTN  PUT  ADDR  OF  JS  + 2 INTO  XR12 

0.12.1  OBTAIN  STRTING  LOC  OF  THE  ARGUMENT  LIST 

13 

la.a.M 

IS. GLBRTN  MODIFY  THE  RETURN  ADDR 
THE  ARGUMENTS 

4 , NARGXJ-2 , M 
0.4.13 
ARGLST. 4 
4 , g.M 
XFER 


NOU  SELECT  THE  PROPER  SVMBOL 


VDSEL 

1 

8 

SVMPTR.8. I 
13 

TEMP 

SVMPTP^g. 8. 


4 Tf  HP 

4,1,11 

rwm* 


A RFO  COMT  rutL  UBD  LNGTM  OF  SELECTED  SVMB  STORAGI 

AREA 


i 


COWT^p^  BIAS  FO#  MAR 
•^9$  « *#OF  4 VOID 
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252  06CB6  27830  14003E00  LDA  VDOE  VDOF  IS  NOT  GREATER  THAN  UPPER  LIMIT 

253  06CB8  27832  FC0O3E0C  SBF  VDLL 

254  06CBA  27834  630A  JL  LOCLL 

255  06CBB  27835  0700 

255  06CBC  27836  14003E00  LDA  VDOF  VDOF  IS  UITHIN  RANGE 

256  06CBE  27838  6008  JU  LOCO 

257  06CBF  27839  0700 

257  06CC0  27840  14003E0A  LOCUL  LDA  VDUL 

258  06CC2  27842  6004  JU  LOC0 

259  06CC3  27841  0700 

259  06CC4  27844  1 4A03E0C  LOCLL  LDA  VDLL 

260  06CC6  27846  94OO3E02  LOC0  MLF  KAVD 

261  06CC8  27848  BC003E04  ADF  KBVD 

262  06CCA  27850  0400  CFX 

263  06CCB  27851  0500  E AB 

264  06CCC  27852  6204  JG  RNDP 

265  06CCD  27853  0700 

265  06CCE  27854  AC009404  ADL  IONE 

266  06CD0  27856  05O0  RNDP  EAB 

267  06CD1  27857  0843  SLL  LQUPL 

268  06CD2  27858  A4A03E06  ADU  HPVD 

269  06CD4  27860  0841  SLL  1 

270  06CD5  27861  06C0  LXA  8 

271  06CD6  27862  6C413E14  IMN  8. TEMP 

272  06CD8  27864  14408000  PTR  LDA  TVRSTR , 8 

273  06CDA  27866  C4680000  LOR  0,13 

274  06ODC  87868  30408600  8TA  TVR6TR.8 

a7S  06CDE  27870  6C420010  IMP  8.UPLX2.M 

276  06CE0  27872  6C6A0002  IMP  13. 2. M 

e77  06CE2  27874  6C230002  IMN  4,2.M 

278  06CE4  27876  608C  JU  PTR 

278  06CE5  27877  0700 

279  06CE6  27878  74009490  RTN  RTA  GLBRTN 


0 ERRORS 


FOCAP- 

'1  VI*. *1  f»AOE 

1 

L INC 

MS.  ADDRESS 

INSTCQDK 

SOURCE 

statement 

139 

* XYDOF 

• -- 

FIRED  SIZE  8VMB0L  ROUTINE  WITH 

TUO  (X  AND  V)  THANALAT I ONAL  DEOWFF A 

M0 

1 

OF 

FREEDOM  (DOF) 

Ml 

* 

t^a 

•eeoE 

M 

NARQX3 

BETD 

M 

THE  NO.  OF  AROUMFNTS  (TIMFS  8)  TO  BE  XFERFD 

143 

06CF2 

27890 

ORQ 

xvoof 

144 

06CF2 

B7890 

0400949C 

PTR 

Ql.BRTN 

MB 

•8CF4 

27892 

64306EF8 

JGU 

STRTPT 

MS 

06CF6 

27894 

42000000 

9XTEEN 

DEC 

16  0 

14? 

* STORAGE  FOR 

XI ER  OF  ARGUMENTS  INTO  THE  ROUTINE 

148 

03E00 

15872 

XFX 

EOU 

apglst 

FIXED  SIZE  SYMBOL 

X INPUT 

149 

O3E02 

15874 

VFX 

EOU 

ARGLST+2 

FIXED  SIZE  SYMBOL 

V INPUT 

150 

03EO4 

15876 

KAFX 

EOU 

APGl.ST  ♦ 4 

SCALING  PARAMETER 

151 

03E06 

15878 

KBEX 

EOU 

APGLST  + 6 

SCALING  PARAMETER 

isa 

03E08 

15880 

KCFX 

EOU 

APGLST+8 

SCALING  PARAMETER 

153 

03E0A 

15882 

KDFX 

EOU 

APGLST-f  10 

SCALING  PARAMETER 

154 

03E0C 

15884 

XV 

EOU 

APGLST + 1 2 

FIXED  512E  SYMBOL 

SELECTED 

155 

♦ STORAGE  FOR 

THE  FIXED 

SYMBOLS 

156 

06CF8 

27996 

00000078 

FXSVM0 

HEX 

00000078 

MALE  SYMBOL 

178 

06D2O 

27936 

0003E00O 

FX9VM1 

HEX 

0003EO00 

FEMmLE  SYMBOL 

20  3 

06D4E 

27982 

0O01C000 

FX5VM2 

HEX 

1CO00 

LaPGE  CROSS 

228 

06D7C 

28028 

00008000 

FXSVM3 

HEX 

00009000 

SMALL  CROSS 

253 

06DAA 

28074 

0007F000 

FX5VM4 

HEX 

00O7F000 

LARGE  CIRCLE 

286 

06DE8 

28136 

0003E000 

FXSVMS 

HEX 

O003E000 

SMALL  CIRCLE 

303 

06E06 

28166 

0001 r 000 

FX5VM6 

HEX 

000 1 0000 

SOLID  SMALL  CIRCLE 

312 

06E  1 4 

2S180 

00O7F000 

FX5VM7 

HEX 

OOO7F000 

DOWN  POINTER 

322 

06E22 

22 194 

00008000 

FXSVM8 

HEX 

OOO08000 

UP  POINTER 

332 

0SE30 

23208 

00008000 

FXSVM9 

HEX 

00008O00 

UP  OP  DOWN  POINTER 

347 

06E4h 

2.9234 

0004 ] 000 

FXSM10 

HC- 

00041000 

LARGE  SEMI  CIRCLE 

380 

06E  S 8 

28296 

03F  F h FE0 

FXSM1 1 

HCX 

03Ff  FF E0 

BOX 

403 

06EB2 

28338 

7FF087FF 

FXSM12 

HEX 

7FF087FF 

ATTITUDE  REF  MARK 

410 

06EP' 

, ■ 34  - 

SVMENP 

EOU 

* 

4 1 t 

♦ 

412 

06EBC 

29  343 

O4O06C F8 

SVMPTP 

PTP 

} X5VM0 

413 

06FRF 

29  350 

04OO6D20 

PTP 

FXSVM1 

414 

06EC0 

28  352 

A40O6D4E 

P TP 

FXSVMc? 

4 15 

06EC2 

28  354 

v»4006t)7C 

PTP 

FX5VM3 

416 

06EC4 

« ' 356 

0 4006  DM A 

PTP 

FXSVM4 

417 

06F-:  6 

23359 

04006DE8 

PTP 

FX5VM5 

418 

06FF9 

28  360 

04006E06 

PTP 

F XSYM6 

419 

06p(  h 

28362 

04006E i a 

PTP 

FX6VM7 

420 

06ECC 

28364 

04006E22 

PTP 

FXSVM9 

421 

06FCE 

28366 

04OO6E  30 

PTP 

FX5VM9 

422 

06FD0 

28  368 

O4O06E4A 

PTP 

FX5M10 

423 

B6ED? 

29370 

04006F98 

PTP 

FXSM1 1 

424 

06ED4 

28372 

04O06EB2 

PTP 

FXSM12 

425 

06FD6 

, >63?4 

04006EPC 

PTP 

5VMEND 

426 

* 

427 

06EDP 

28376 

04006D1 0 

SVMCTR 

PTP 

CTRO 

428 

06EDA 

23378 

04OO6D2E 

PTP 

CTR1 

429 

06EBC 

88380 

04006D64 

PTP 

CTR2 

430 

06EDF 

28382 

04006P92 

PTP 

CTR3 

431 

06FE0 

28384 

04006DC8 

PTP 

CTR4 

432 

06EE2 

28386 

04006DF6 

PTP 

CTR5 

433 

06EE4 

28389 

04006E0C 

PTP 

CTR6 

434 

06EF6 

28390 

04»?06E  1 4 

PTP 

CTR7 

435 

06EE8 

28392 

040O6E2E 

PTP 

CTP8 

• 

4 36 

06EEA 

*94 

O4006E3C 

PTR 

CTP9 

437 

06EEC 

28396 

04006E68 

PTR 

CTP10 

438 

06EEE 

28398 

04006E9C 

PTP 

CTP 1 1 

439 

06EF0 

28400 

04006EB2 

PTR 

FX5M12 

440 

* 

441 

06EF2 

28402 

5C60949C 

STRTPT 

LDX 

12.GLBRTN  PUT  ADDR  OF  JS+2 

INTO  XR12 

442 

06EF4 

28404 

34640000 

LAE 

0.12.1 

OBTAIN  STRTING  LOC 

OF  THE  ARGUMENT  LIST 

443 

06EF6 

28406 

06E8 

LXA 

13 

444 

06EF7 

28407 

0700 

444 

06EF8 

28408 

6C620002 

IMP 

12. 2. M 

445 

06EFA 

28410 

1 C60949C 

STX 

1 2 . GLBRTN  MODIFY  THE  RETURN 

ADDR 

446 

* TRANSFER 

THE  ARGUMENTS 

447 

06EFC 

28412 

5C22000C 

LDX 

4.NARGX2 

-8.  M 

448 

06EFE 

28414 

16680000 

XFER 

LDA 

0. A. 13 

449 

06F00 

28416 

3E003E00 

STA 

ARGLS3 . 4 

450 

06F02 

28418 

6C230002 

IMN 

4 , 2 , M 

81 
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451 

06F04 

28420 

6086 

JU 

XFFP 

451 

06F05 

28421 

0700 

452 

* 

453 

* ARGUMENTS 

ARE  XFEPED  , 

, NOU 

SELECT 

THE  PROPER  SVMBOL 

454 

06F06 

28422 

1 4003E0C 

LDA 

XV 

455 

06F08 

28424 

084  1 

SLL 

1 

456 

06F09 

28425 

06C0 

LXA 

8 

457 

06F0A 

28426 

34446EBC 

LAE 

SVMPTP, 8, 

, I 

458 

06F0C 

28428 

06E8 

LXA 

13 

459 

06F0D 

28429 

0700 

459 

06F0E 

28430 

3C003F 1 4 

STA 

TEMP 

460 

06F10 

28432 

34  4 46E BE 

LAF. 

SVMPTR-f  2 , 

8,  I 

461 

06F  1 2 

28434 

06E0 

LXA 

12 

462 

06F13 

28435 

0700 

462 

06F14 

28436 

6C613E14 

TMN 

12. TEMP 

463 

06F16 

28438 

6C630O02 

IMN 

1 2 , 2 , M 

464 

06F18 

284  40 

34446ED8 

LAE 

SVMCTP. 8. 

I 

465 

06F1  A 

27442 

F4A03E14 

SBU 

TEMP 

466 

06F1C 

28444 

0843 

SLL 

LGUPL 

467 

06F2D 

28445 

0700 

467 

06F1E 

28446 

3C003E 1 4 

STA 

TEMP 

TEMP 

CONTAINS 

BIAS 

FOR  XR8 

468 

* 

469 

06F20 

28448 

1 4A03E02 

LDA 

VFX 

CHECK 

FOR 

(-1 

0 < 

VI  < 

1 .©> 

470 

06F22 

28460 

FC0O948A 

SBF 

ONE 

471 

06T24 

2846P 

620C 

JG 

Ul.  I Ml 

(VI 

- 

10) 

> 

0 

4 72 

06F25 

28463 

0700 

472 

06F26 

28454 

1 4003E02 

LDA 

VFX 

473 

06F28 

28456 

F C00948C 

SBF 

MONE 

474 

06F2A 

28458 

630A 

JL 

LLIM1 

(VI 

♦ 

1 0) 

< 

0 

475 

06F2B 

28459 

0700 

475 

06F2C 

28460 

1 4003E02 

LDA 

VFX 

4 76 

06F2E 

28462 

6008 

JU 

LOC0 

477 

06F2F 

£846  3 

0700 

477 

06F  30 

28464 

1 400948A 

UL I Ml 

LDA 

ONE 

VFX 

IS 

SET 

TO 

THE 

UPPER 

LIMIT 

478 

06F32 

2°466 

6004 

JU 

LOCO 

479 

06F33 

28467 

0 700 

479 

06F34 

28468 

1 400*3490 

LLIM1 

LDA 

MONE 

VFX 

IS 

SET 

TO 

THE 

LOUER 

LIMIT 

480 

06F36 

28470 

94003E04 

LOC0 

MLF 

K AFX 

481 

06F38 

28472 

BCO03E06 

ADF 

KBFX 

482 

06F3A 

28474 

0400 

CFX 

483 

06F3B 

28475 

0801 

SLID 

1 

484 

06F3C 

28476 

80020001 

SAM 

1 . M 

485 

06F3E 

28478 

6004 

JU 

♦ ♦4 

485 

06F3F 

28479 

07O0 

486 

06F40 

28480 

A4020001 

ADU 

1 .M 

487 

06F42 

29482 

0C  4 l 

SPA 

1 

488 

06F43 

28483 

0844 

SLL 

4 

489 

06F44 

28484 

06  C0 

LXA 

8 

490 

0bF  45 

28485 

0700 

490 

06F46 

28486 

6C413E1 4 

IMN 

8.  TENP 

491 

* 

492 

06F48 

28488 

14003E00 

LDA 

XFX 

CHECK 

FOR 

(-1 

t . 0 < 

XI  < 

1 .0) 

493 

06F4A 

28490 

FC00948A 

SBF 

ONE 

494 

06F4C 

28492 

620*' 

JG 

ULIN2 

(XI 

- 

1 0) 

> 

0 

495 

06F4D 

28493 

0700 

495 

06F4E 

28494 

1 4003E00 

LDA 

XFX 

496 

06F50 

29496 

FC00948C 

SBF 

MONE 

497 

06F52 

28498 

6300 

JL 

LLIM2 

(XI 

4 

1 0) 

< 

0 

498 

06F53 

28499 

0700 

498 

06F54 

28500 

14003F00 

LDA 

XFX 

499 

06F56 

28502 

6008 

JU 

LOCI 

500 

06F57 

28503 

0700 

500 

06F58 

28504 

1 4*30948A 

ULIM2 

LDA 

ONE 

XFX 

IS 

SET 

TO 

THE 

UPPER 

LIMIT 

501 

06F5m 

28506 

6004 

JU 

LOCI 

502 

06F5B 

28507 

0700 

502 

06F5C 

28508 

1400948C 

LLIM2 

LDA 

MONE 

XFX 

IS 

SET 

TO 

THE 

LOUER 

LIMIT 

503 

06F5E 

28510 

94003F  08 

LOCI 

MLF 

KCFX 

504 

06F60 

29512 

BC003E0A 

ADF 

KDFX 

505 

06F62 

28514 

B4006CF6 

DVF 

SXTEEN 

82 
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SOS 

ObF  h 4 

2861b 

04A0 

CF  X 

S07 

06F"6S 

2R617 

0700 

SO  7 

06F6G 

2.8618 

RC020001 

SAM 

1 , M 

50R 

061  6R 

28520 

6026 

Jll 

EVEN 

SOS 

OAF  69 

38521 

0700 

S09 

06E6A 

28522 

R4O2O0OF 

AND 

1 4 . M 

510 

*fiF6< 

28524 

3C0O3r  1 4 

STA 

TFMP 

511 

06rbE 

28526 

6C403E14 

IMP 

8. TEMP 

512 

06F7O 

28628 

1 4020000 

LDA 

0.  M 

513 

OAF  72 

286  10 

0804 

SLl.D 

LCBPU-t 

514 

06F7.3 

38531 

OF- AO 

LXA 

4 

515 

06F7  4 

286  92 

64020000 

LOOPO 

LDP 

0.  M 

516 

06F76 

28634 

1 4680000 

LDA 

0.13 

517 

06F  78 

28696 

0F20 

58'  D 

0 . 4 

SIR 

06F79 

■ 

0 700 

SIR 

06F  7m 

2RS9R 

r 440ROO0 

LOP 

TVPSTP, 8 

519 

OAF  71 

284  >40 

3F  408O0O 

S3  A 

TVR6TP . 8 

520 

06F  7E 

2F  542 

0500 

FaF: 

521 

OoF  7F 

2264  3 

0700 

521 

06F80 

2R644 

04408002 

LOP 

T VPSTP*  2 . H 

522 

v\f,f  82 

2P646 

V 4 0R0Or' 

STA 

TVPi,Tp42, 8 

52  * 

OSF  8 4 

.'26  4 > 

Ai.4,  OO10 

IMF* 

P . UP1  > 2 . M 

524 

06FPA 

28660 

6' AM0OO2 

IMP 

13.2  h 

525 

OF.f  85 

2PS52 

*.<  > *0002 

IMN 

| e*.  2.  M 

526 

06F  8A 

2861,4 

6096 

JU 

LOOPO 

526 

05  F 88 

28r»66 

0700 

527 

OAF  8* 

« 1 ' 

?4O094«Jf 

PI  A 

Ol.BPTN 

62R 

OAF  RF 

29568 

r.r  2200  1 0 

FVEN 

LD/ 

4 . 16. »» 

5 29 

OAFOO 

22560 

0.  4 1 

SPA 

1 

S 30 

ObF  91 

2H6bl 

0841 

SLL 

1 

531 

OGF  A.' 

28662 

3C  OO  3V  1 4 

STA 

TFMP 

532 

OAF  94 

28564 

6040  IF  1 4 

IMP 

R TFMP 

533 

06FO6 

2P6AA 

1 4020000 

LDA 

0.  M 

534 

OAF  VR 

28SA8 

080  4 

fil  I D 

LOBPU-t 

535 

OAF  99 

31  589 

0700 

S35 

06F9A 

28570 

3C003E14 

STA 

TEMP 

5 36 

06F0C 

28672 

6C213E14 

IMN 

4. TEMP 

637 

OAF  91 

28574 

64020000 

LOOPS 

LDP 

0.  M 

SIR 

OAF  AO 

2PS76 

1 4»  .3v*0Oo 

LDA 

0.13 

6 39 

Obr  A2 

28S78 

0A20 

SLCD 

0.4 

640 

OAF  A 9 

28679 

0700 

540 

06F  A 4 

28620 

C 4 40' '00O 

L^P 

TVPSTP . R 

541 

ObF  Afa 

28682 

3»  4‘IHnOO 

510 

tvwstp , « 

64P 

OAF  AR 

por,o>) 

0600 

TOO 

543 

ObF  A9 

286 

0700 

643 

Obf  Am 

28526 

C 4 40 71  F L 

LuF 

TVRSTP-2, 8 

644 

06F  AC 

28588 

3C467FFE 

STA 

TVP9TP-P, « 

5 46 

OATAF 

■ • oo 

S'’  4200  10 

IMP 

P UPLX3.M 

545 

OAF  BO 

2R592 

AC AA0O02 

IMF* 

1 3,2. M 

647 

OAF  B2 

28694 

f»r  A 3O0OP 

I Ml  1 

1 2 , 2 , M 

64R 

OAF  P 4 

28596 

609 A 

JIJ 

I.O0F  t 

64R 

OF  F f»5 

2869? 

0700 

640 

ObFpA 

28598 

740O949C 

PTA 

GLBPTN 

560 

0721  4 

29204 

» Ip»; 

29204 

551 

0721  4 

20204 

00000800 

ME  y 

00000800 

562 

07216 

2 020  A 

0O000F F F 

hf  y. 

M0000f ft 

663 

07218 

20^08 

0OO0O7F F 

FlF  ' 

OO0A0  7F  f 

654 

1 NO 

0 EPPOPS 

I 

i 

1 


{ 

» 

1 
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1 39 

t DPDOUT  -- 

ROUTINE  TO  GENERATE  A 

DIGITAL  READOUT  SYMBOL 

1 40 

* 

141 

00O0A 

10 

NARGX3 

SETD 

10 

THE  NO.  OF 

ARGUMENTS  (TIMES  3)  TO  BE  XFERED 

1 42 

06FC3 

38610 

OPG 

DRDOUT 

143 

06EC3 

38610 

0400949C 

PTR 

GLBRTN 

• 

144 

06EC4 

38613 

6430709E 

JGU 

STRTPT 

145 

O3E00 

1S872 

INPT 

EOU 

ARGLST 

146 

03E03 

1 5974 

HMBO 

EOU 

ARGLST+3 

147 

03E04 

15876 

STLN 

CGU 

APGLST ♦ 4 

148 

03EO6 

15879 

STUC 

EOU 

APGL5T+8 

149 

03E08 

15880 

TITLE 

EOU 

APGLST+8 

ISA 

06FC6 

l •» 

0000001F 

DGTMSK 

HEX 

0000001F 

MASKS  FOR 

THE  INDIVIDUAL  DIGIT  POSITIONS 

151 

06FC8 

38616 

0O0O07C0 

HEX 

OOO007C0 

153 

06FCA 

38618 

000 1 F 000 

HEX 

00O1FO00 

153 

06FCC 

33630 

007C0OOO 

HEX 

0O7COOO0 

154 

06FCF 

38632 

1 F O000O0 

HFX 

IF 000000 

155 

O6FD0 

38634 

E 0000000 

HEX 

EOOOOOOO 

156 

06FD3 

38636 

0O033F1C 

TTLS 

HEX 

0O023F1C 

HDG 

157 

06F  I»4 

27528 

000234 A3 

HEX 

0O0224A3 

HDG 

155 

06FD6 

28630 

000234 A0 

HEX 

000324 A0 

HOG 

159 

06FD8 

38633 

0OO3E 4A0 

HEX 

O0O3E4AO 

HDG 

160 

06FDA 

• < 4 

OO0234A6 

HEX 

000224 AG 

HDG 

161 

06FDC 

39636 

000324 A3 

HEX 

00032402 

HDG 

163 

06FUE 

3»638 

00033F 1 C 

HEX 

0OO32F1C 

HDG 

163 

06FE0 

39640 

LOCRTN 

BSS 

2 

164 

06FE3 

38643 

000080 1C 

HEX 

000090 ir 

AIPSPEED 

165 

0F.F  E 4 

3864  4 

0001 4002 

HE  < 

000 140 A3 

AIRSPEED 

1 66 

06FE6 

296*6 

00022 1 2o 

HEX 

00032130 

AIRSPEED 

167 

06FE8 

28643 

000332 1C 

HEX 

000322 1 C 

AIRSPEED 

168 

06FEA 

38650 

0OO  3E 4 02 

HEX 

0O03E 403 

AIRSPEED 

1 • / 9 

06FEC 

38653 

00032833 

HEX 

00022822 

airspeed 

170 

06FEF 

28654 

000220 » • 

Hr  < 

v»vn>2f‘A  j <; 

AIPSPEED 

171 

06F  F 0 

2065*. 

0000000A 

TEN 

DF  C 

10 

173 

06F  F 2 

, § b 

00O9i  P9* 

HEX 

0003C89C 

PANGE 

173 

06F  f 4 

3'  660 

000 12C «3 

HEX 

00012CA2 

range 

174 

or.FFt, 

28662 

OO01 2AAO 

HEX 

0O012AOO 

PANGE 

175 

06F  F 8 

38664 

OA0ir  0A0 

HEX 

00010000 

PAHGE 

1 76 

06FFA 

22666 

000139A6 

HEX 

00012906 

PANGF 

177 

06F  f C 

29668 

AOOIC8A2 

HEX 

0001 2803 

RANGE 

178 

06FFE 

39670 

000 l 389C 

HEX 

0O01839C 

PANGF 

179 

07000 

28672 

0E  J3F.  J3E 

NUMBPS 

HEX 

0E J8E J8E 

ZERO 

180 

07003 

38674 

1 1451451 

HEX 

1 1451451 

181 

07004 

2°676 

11451 451 

HEX 

1 1451451 

183 

07006 

• 

l 1451451 

HEX 

1 1461451 

183 

07008 

28630 

11451461 

HE/ 

11461451 

184 

070rt#» 

1 1 451461 

HEX 

11451461 

186 

0700* 

28604 

of  if  ?8F 

HEX 

0E39E39E 

1 86 

0700E 

38686 

ecc occcc 

TENTH 

HEX 

0CCOCCCC 

187 

070  t A 

P.Pfktf'* 

AF  >6F  38E 

HEX 

OF  3«E  3PF 

ONE 

188 

07013 

38690 

041 O4104 

HE  v 

041O41O4 

ONE 

189 

0701  4 

PPG  92 

O41O4104 

HEX 

04104104 

ONE 

190 

07016 

38694 

04104104 

HEX 

04104104 

ONE 

191 

070  l p 

38696 

04 104104 

HEX 

04104104 

ONE 

193 

07010 

20698 

Wf  30C  10C 

HEX 

00300300 

ONE 

193 

070  1C 

38700 

04 104I04 

HEX 

04104104 

ONE 

194 

070  IE 

38702 

C 71 C 71(0 

SGNIJPD 

HEX 

C7ir 71C0 

SION  WORD 

- CONTAINS  MINUS  SIGN  FOR  ALL  DIGIT  POSITIONS 

195 

07030 

38704 

iF7Pr?Dr 

HEX 

1F7DF7DF 

TUO 

196 

07023 

38706 

08208208 

HEX 

08308308 

TUO 

197 

07034 

28708 

04104104 

HEX 

04104104 

TUO 

198 

07036 

38710 

02093092 

HEX 

02083083 

TUO 

199 

07028 

38713 

0104104! 

HEX 

01041041 

TUO 

300 

0702A 

38714 

1 1451451 

HEX 

1 1 461451 

TUO 

301 

0702C 

38716 

0F3PF  98E 

HEX 

0E38 E 18t 

TUO 

303 

0702E 

' • 

SIGN 

BSS 

3 

303 

07030 

38730 

0E18E38E 

HEX 

0E38E38E 

THPEE 

304 

07032 

38733 

11461451 

HEX 

1 1451451 

THREE 

305 

•70  '4 

39734 

01041041 

HEX 

01041O41 

THPEE 

306 

07036 

28736 

06186186 

HEX 

06186186 

THREE 

307 

07038 

36738 

0104104 l 

HEX 

01O41O41 

THPEE 

308 

07O3h 

39730 

11461451 

HEX 

1 1451451 

THREE 

309 

0703C 

38733 

0E35E38E 

HEX 

0E38E38E 

THPEE 

310 

0703E 

38734 

00000000 

HEX 

0 

84 
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211  07040 

212  07042 
219  07044 

214  07046 

215  0704? 

216  0 7 0 4 A 

217  O704C 

218  O704F 

219  0705 A 

220  07052 

221  07064 

222  07056 

22 3 0706? 

224  0705A 

225  07060 

226  0705E 

227  07060 

228  07062 

229  07064 

230  O7066 

231  07062 

232  0706A 

233  07060 

234  0706E 

235  07070 

236  07072 

237  07074 

238  07076 

239  07078 

240  07076 

241  0707C 

242  0707E 

243  07080 

244  07082 

245  07084 

246  07086 

247  07088 

248  0708A 

249  07086 

250  0708E 

251  070Q0 

252  07092 

253  07094 
854  07096 

255  07009 

256  0709A 

257  0709C 

258 

259 

260  0709E 

261  070A0 

262  070A2 

263  070A3 

263  070A4 

264  O70A6 

265 

266  070A8 

267  070AA 

268  070AC 

269  070AE 

270  07000 

270  070DI 

271 

272 

273 

274 

275  070P2 
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28736 

O2O82092 

HEX 

02092092 

FOUR 

28738 

0202.2092 

HE  X 

O2O82032 

FOUR 

28740 

1F7DF7DF 

HEX 

1F7DF7DF 

FOUR 

29742 

12402492 

HEX 

1 2492492 

FOUR 

227-14 

0A29A28A 

HEX 

0A28O23A 

F OUR 

28746 

06186186 

HEX 

06136136 

FOUP 

as'M? 

02082082 

HE  X 

02082082 

FOUR 

22750 

00000000 

HEX 

0 

28752 

IE79E79E 

HEX 

IF.  796792 

FIVE 

23754 

0 1 0 4 1 1;!  4 1 

HF.  J. 

0104104 1 

F I VF 

22756 

0104104 J 

HE 

0104 1 04  J 

FTVF 

2275? 

1 E70F79F 

Hf  < 

1 F 7 op 

FIVE 

2276A 

1041O41O 

HE  • 

1041041 0 

FJ  VE 

29.76a 

1 0 4 10  4 1 0 

nr  ■> 

10410110 

FIVE 

2870.4 

if  rnr  ,'Pf 

hf 

tF7DF  ?nr 

F 1 VF 

28766 

0001)0000 

HF  *' 

0 

2 7<  i 

0E  38F  38E 

HE  < 

0E38E38E 

SIX 

29770 

1 1 45J461 

HEX 

1 1451 

5 1 X 

22772 

10659659 

HFX 

19659659 

SIX 

28774 

16596596 

HEX 

16596596 

SIX 

22776 

104 IO410 

HEX 

10410410 

SIX 

28779 

11451451 

HEX 

1 1451451 

SIX 

28720 

8E93E38E 

HEX 

0F.38F.33E 

SIX 

28782 

00000000 

HEX 

0 

287P4 

08209208 

HFX 

09208209 

SEVEN 

29726 

08208208 

HEX 

08209203 

SEVEN 

28722 

04104104 

HEX 

04104104 

SEVEN 

28700 

04104104 

HEX 

04104104 

SEVEN 

28792 

02092092 

HE  < 

02082082 

SEVEN 

28794 

01041041 

HEX 

01041041 

SEVEN 

2R796 

1F3DF  3DF 

HEX 

1F3DF3DF 

SEVEN 

29798 

00000000 

HEX 

0 

28800 

0E98E38E 

HEX 

0E3RE38E 

EIGHT 

28802 

1 1451451 

HEX 

11451451 

EIGHT 

28904 

11451451 

HEX 

11451451 

EIGHT 

28206 

0F38E38E 

HEX 

0E38E  38E 

EIGHT 

28809 

11451451 

HEX 

11451451 

FIGHT 

28810 

11451451 

HEX 

1 1451451 

FIGHT 

28812 

0E38E99E 

HEX 

0E38E38E 

EIGHT 

28914 

00000000 

HEX 

0 

28816 

0F3C>F  1PE 

HEX 

0E38E38E 

NINE 

289  1 8 

11451451 

HEX 

11451451 

NINE 

2P9P0 

01041041 

HEX 

O1041041 

NINE 

28822 

0F3CF3CF 

HEX 

0F3CF 3CF 

NINE 

28924 

11451451 

HEX 

1 1451451 

NINE 

28826 

1 1 451451 

HEX 

11451451 

NINE 

28828 

0E39F38E 

HEX 

0E38E38F 

NINE 

* 

X 


28830 

5C60949C 

STRTPT 

LDX 

1 2 . GLBRTN  PUT  ADDR  OF  JS*2 

INTO  XR 1 2 

28832 

34640000 

LAE 

0,12.1  OBTAIN  STRT1NG  LOC 

OF  THE  ARGUNENT 

28834 

06E8 

LXA 

13 

28835 

0700 

28836 

6C620002 

IMP 

12.2. M 

28838 

1C60949C 

STX 

12. GLBRTN  MODIFV  THE  RETURN 

ADDR 

X TRANSFER  THE 

ARGUMENTS 

28840 

5C220008 

LDX 

4.NARGX2-2.M 

28842 

16680000 

XFER 

LDA 

0.4. 13 

28844 

3E003E00 

STA 

ARGLST. 4 

28846 

6C230002 

IMN 

4.2.M 

28848 

6086 

JU 

XFER 

28949 

0700 

X 

X 

X 

X 

28850  14003E04  STRT1  LDA  STLN 


85 
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276 

070B4 

283^2 

08  4 4 

SLL 

4 

277 

070B5 

28853 

0700 

277 

07086 

28854 

A4003E 06 

ADU 

STUC 

278 

070B8 

28856 

0600 

LXA 

8 

279 

070B9 

28857 

0700 

279 

070BA 

28858 

14009E08 

LDA 

title 

280 

070BC 

28860 

0844 

SLL 

4 

281 

070BD 

28861 

0608 

LXA 

9 

282 

* 

ONES  PUT  THE  BORDER  ABOVE  AND  $ELOU  THE  DIGITAL  DISPLAY 

283 

070BE 

28862 

14009486 

LDA 

284 

07000 

28364 

30  4076  00 

sta 

TVRSTR-48 . 8 

285 

070C2 

28866 

3 f 4076  OE 

sta 

TVRSTR-SO . 8 

286 

0 ?0O  4 

28868 

3O4O808E 

ST  A 

TVRSTR4 1 42 . 8 

287 

07006 

28870 

3^ 403090 

sta 

TVRSTR+144 . 8 

288 

07008 

23872 

5C220006 

LDX 

4 ,€.M 

289 

070CA 

28874 

1 4 4076  6 E 

TITL 

LDA 

TVRSTR-2. 8 

290 

070CC 

28876 

C44866D2 

LOR 

TTLS. 9 

291 

070CE 

28878 

3C40766E 

sta 

TVRSTR-2 , 8 

292 

070D0 

28880 

6C4200 1 0 

I HP 

8. 16. M 

293 

070B2 

23682 

6C4A0002 

IMP 

9. 2.  M 

294 

070D4 

28884 

6C2900O1 

IMN 

4.  1 .M 

295 

070D6 

28896 

608C 

JU 

TITL 

295 

0701.7 

28887 

0700 

296 

070D8 

28888 

6C  4 30070 

IMN 

8. 1 12. M 

297 

070DA 

88890 

5C5A0000 

LDX 

1 1 . 0. M 

298 

070DC 

28892 

1 4003600 

LDA 

INPT 

299 

070DE 

28894 

64A20000 

LDB 

0 . M 

300 

07060 

28896 

6206 

JO 

P INPT 

301 

0706  1 

28897 

0700 

901 

07062 

28898 

94009480 

MLP 

MONE 

302 

07064 

28900 

54020001 

LDB 

1 . M 

303 

070E6 

28902 

7r  00702E 

PI  HPT 

STB 

SIGN 

304 

07068 

28904 

54020000 

LDB 

0.M 

305 

070EA 

2 8906 

040O 

C6  X 

306 

070E.B 

28907 

0801 

SLLD 

1 

307 

070EC 

28908 

80020001 

SAM 

1 . M TEST  POP  ROUNDOFF 

308 

070EE 

28910 

6004 

JU 

5HBK0 

308 

070ET 

2891  1 

0700 

309 

070F0 

28912 

A4020O01 

ADU 

1 . M 

310 

07062 

89914 

0861 

SHBK0 

SRLD 

1 

31 1 

070E3 

23915 

0700 

111 

07064 

28916 

D400700E 

HUL 

TENTH 

312 

07066 

28913 

3000 36 00 

STA 

INPT 

31  3 

070F8 

23920 

0500 

EAB 

314 

07069 

28921 

0861 

SRLD 

1 

315 

0706  A 

28922 

D402000A 

MIJL 

10. M 

316 

070rO 

28924 

0301 

SLLD 

1 

317 

0706  b 

28925 

0700 

317 

07066 

28926 

80020001 

SAM 

1 .M 

318 

07  1 00 

289d8 

00  1 4 

JU 

SHBK1 

313 

07101 

28929 

0700 

319 

07102 

999  <0 

00020016 

EXO 

31  .M 

320 

07104 

99  * 19 

80020012 

SAM 

18. N 

321 

07106 

28934 

6008 

JU 

ITS9 

321 

0710? 

289  J5 

0700 

922 

07108 

28936 

CO020016 

EXO 

31  , M 

323 

07I0A 

28938 

A4020001 

ADU 

1 . M 

324 

0710C 

28940 

6008 

JU 

SMBK1 

325 

071 0D 

28941 

0700 

325 

0710E 

28942 

1 4020001 

ITS9 

LDA 

1 .« 

326 

07110 

28944 

5O3A0000 

LDX 

7.0.M 

327 

07112 

28946 

A78036 00 

ADUR 

INPT 

328 

07114 

28943 

0861 

SHBK1 

SPLD 

I 

329 

07115 

28949 

0844 

SLL 

4 

330 

071  16 

28950 

0608 

LXA 

9 
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331 

07117 

28951 

0700 

331 

071  18 

28952 

5C22000C 

LDX 

4. 12. M 

332 

071  1A 

28954 

16487000 

URTDGT 

LDA 

NUMBRS. 4.9 

333 

071  1C 

28956 

84586FC6 

AND 

DGTMSK . 1 1 

334 

071  IE 

28958 

C 4408000 

LOR 

TVRSTR ,8 

335 

07120 

28960 

3C  408000 

STA 

TVRSTR. 8 

336 

07122 

28962 

6C420010 

IMP 

8. 16.M 

337 

07124 

28964 

6C230002 

IMN 

4 . 2.M 

338 

07t26 

28966 

608C 

JU 

URTDGT 

338 

07127 

28967 

0700 

339 

07128 

28968 

1 4003E00 

lda 

INPT 

340 

0712A 

28970 

6C430070 

IMN 

8, 1 12, M 

341 

071 20 

28978 

6C5A0003 

IMP 

ll ,e,M 

342 

0718E 

28974 

B4693E68 

ICL 

11 .NMB0 

343 

07130 

28976 

6004 

JU 

TSTA 

343 

07131 

28977 

0700 

344 

07132 

28978 

60BE 

JU 

SHBK0+2 

345 

07133 

28979 

0700 

345 

07134 

28980 

80009486 

TSTA 

SAM 

ONES 

346 

07136 

28988 

6008 

JU 

TSTSGN 

340 

07137 

28991 

0700 

347. 

07138 

28984 

245B000A 

ICL 

1 1 . 10. M 

348 

0713m 

28936 

6004 

JU 

TSTSGN 

348 

07138 

28987 

0700 

349 

071  3C 

28988 

6008 

JU 

SWPK0*2 

350 

071  3D 

28989 

0700 

350 

0713E 

28990 

1 4 00702E 

TST5GN 

LDA 

SIGN 

351 

07140 

28992 

80020001 

SAM 

l . M 

352 

07142 

28994 

74009490 

RTA 

GLBPTN 

353 

07144 

28996 

1 40070 1 E 

LDA 

SGNURD 

354 

071  46 

28998 

84686FC6 

AMD 

DGTMSK . 11 

355 

07148 

29000 

04  408040 

LOR 

TVR6T9-*64 ,9 

356 

07  1 4 A 

29002 

30408040 

STA 

TVPSTP+64. 8 

357 

07  1 40 

29004 

7400949C 

PTA 

GLBPTN 

358 

fc  ND 

0 EPPPPS 
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APPENDIX  B 


VARIAN  PRINTER/PLOTTER  ROUTINE  (PRNTSM) 


This  appendix  contains  the  SKC-2000  computer  listing  for  the  PRNTSM 
routine.  This  routine  was  used  to  output  in  the  report  onto  a Varian  electro- 
static printer/plotter. 


FOCAP-S  Vie. 03  PAGE  1 

LINE  ABS.  ADDRESS  INSTCODE  SOURCE  STATEMENT 


139 

* PRNTSM  — SUBROUTINE  TO  OUTPUT  THE  SVMBOL  MATRIX  TO  THE  STATOS 

PRINTER/PLOTTU? 

140 

* 

XR8  MUST  CONTAIN  THE  STARTING  ADDRESS  OF  THE  BUFFER 

TO  BE  OUTPUT . 

141 

* 

142 

04100 

16640 

ORG 

prntsm' 

143 

04100 

16640 

0400949C 

PTR 

GLBRTN 

144 

04102 

16642 

6430416E 

JGU 

MTRXOUT 

1 45 

04104 

16644 

C5809444 

LORINS  LOR 

BMSK1 . 3 

146 

04106 

16646 

0700 

NOPINS  NOP 

147 

04107 

16647 

0700 

NOP 

148 

* 

149 

04108 

16648 

00000003 

MAQ  HEX 

3 MAGNIFICATION  <1<  HAG  <S  ) 

150 

0410A 

16650 

00000000 

LGHDIV  DEC 

0 BASE  2 LOG  OF  THE  NO.  OF  DESIRED  HORIZONTAL  GRID  LINES. 

151 

0410C 

16652 

00000000 

LGVDIV  DEC 

0 BASE  2 LOG  OF  THE  NO.  OF  DESIRED  VERTICAL 

GRID  LINES 

152 

0410E 

16654 

HSPACE  BSS 

2 

153 

04110 

16656 

VSPACE  BSS 

2 

154 

04112 

16659 

UPLXMG  BSS 

2 -2tUPLtMAG 

155 

04114 

16660 

SARSTP  BSS 

?. 

156 

041  16 

16662 

SCNBUF  BSS 

88  SCAN  LINE  BUFFER  STOPAGE 

157 

♦COMPUTE  THE 

NO  OF  HALF  WORDS  ON  A MAGNIFIED  LINE 

158 

0416E 

16750 

14004108 

MTRXOUT  LDA 

MAG 

159 

04170 

16752 

*844 

SLL 

LGUPL+1 

160 

04171 

16753 

0700 

160 

04172 

16754 

3C0041 12 

STA 

UPLXMG 

161 

* COMPUTE  THE 

MO.  OF  raster  lines  betueen  scale  divisions 

162 

04174 

16756 

14020100 

LDA 

RL.M 

163 

04176 

16758 

SC18410C 

LDX 

3 , LGVDIV 

164 

04178 

16760 

0DC0 

SRA 

0.3 

165 

04179 

16761 

0700 

165 

0417A 

16762 

3C0041 10 

STA 

VSPACE 

166 

♦ COMPUTE  THE 

NO.  OF  RASTER  COLUMNS  BETWEEN  SCALE  DIVISIONS 

167 

0417C 

16764 

1 4004 1 12 

LDA 

UPLXMG 

168 

0417E 

16766 

SC 184 100 

LDX 

3, LGHDIV 

169 

04180 

16768 

0l»C0 

SPA 

0,3 

170 

04181 

1676Q 

0700 

170 

04182 

16770 

3C00410E 

STA 

HSPACE 

171 

* COMPUTE  THE 

STARTING  ADDPESS  OF  THE  ARPAV  TO  BE  OUTPUT. 

172 

04184 

16772 

1 C 404 1 14 

STX 

8 . SAPSTR 

173 

04186 

16774 

1 40 141 AE 

LDAH 

NXUPD42 

174 

04188 

16776 

C40041 1 4 

LOR 

SARSTP 

175 

0418A 

16778 

3C0041AE 

STA 

NXURt'4  2 

176 

♦READY  THE  STATOS 

177 

0418C 

16780 

64044234 

JS 

LPEBL  ENABLE  THE  STATOS 

178 

0418E 

16782 

64044P.4C 

JS 

RSTRMD  ruT  THE  STATOS  TN  FASTER  MODE 

179 

04190 

16784 

6404425A 

JS 

TOF  TOP  OF  FORM 

180 

04192 

16786 

64044268 

JS 

SVNC  RESET  THE  STATOS  SCAN  PTR 

181 

♦ 

182 

♦OUTPUT  A TOP 

BORDER 

183 

04194 

16788 

64044284 

JS 

CLRSCN  CLR  THE  SCNBUF 

184 

04196 

16790 

64044296 

JS 

FILPUF  FILL  THE  NO.  OF  IJPDS  PEQD  FOR  THE  TOP  BORDER 

185 

04198 

16792 

640442BC 

JS 

PRNTLN  PRINT  THE  LINE 

186 

♦ 

88 
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197 

♦ROUTINE  TO 

LOAD  SCNBUF  UITH  ONE  LINE.  PROPERLV 

188 

* MAGNIFIED. 

FROM  THE  SVMBOL  MATRIX 

189 

0419A 

16794 

5C420000 

LDX 

8, 0.  M 

190 

0419C 

16796 

5C6A0000 

LDX 

1 3 . 0 , M 

191 

0419E 

16798 

64044284 

NXLINE 

JS 

CLRSCN  CLEAR  THE  SCAN  BUFFER 

192 

041 AA 

16800 

640442A8 

JS 

VGRID 

193 

041A2 

1680.2 

14020000 

LDA 

0 , M 

194 

041m4 

16804 

06E0 

LXA 

12  XRJ2-SCNBUF  URD  CTR 

195 

04  1a5 

16805 

06D0 

LXA 

10  XR10-UPP  WITHIN  LINE  CTR  (SVMBOL  MATRIX) 

196 

041  a6 

16806 

0698 

LXA 

3 XR3-SCNPUE  URD  BIT  CTR 

197 

041A7 

16807 

0700 

197 

041A8 

16808 

14009444 

LDA 

BMSK  1 

198 

04  t AA 

16810 

3C6041 16 

STA 

SCNBUF. 12  INSERT  A LEFT  SIDE  BORDER 

199 

041  AC 

16812 

SC4A0000 

NXURD 

LDX 

9.0.M  XR9-BIT  CTR 

000 

041AE 

16814 

54400000 

LDB 

0.8 

201 

041B0 

16816 

7C003E14 

STB 

TEMP 

202 

041B2 

1681 S 

5C 120000 

NXBIT 

LDX 

2.0.M  XR2-MAGNIF1CATI0N  INDEX 

203 

041B4 

16820 

54003E14 

LDB 

TEMP 

204 

041B6 

16822 

0901 

SLLD 

1 

205 

041  B? 

16823 

0700 

205 

041B8 

16824 

7C003E 1 4 

STB 

TEMP 

206 

041  BA 

16826 

8C009404 

SAM 

I ONE 

207 

041BC 

16828 

6004 

JU 

BLANK 

207 

041BD 

16829 

0700 

208 

041  BE 

16830 

6008 

JU 

DOT 

209 

t 

210 

041BF 

16831 

0700 

210 

041CO 

16832 

14004106 

BLANK 

LDA 

NOPINS 

21 1 

041C2 

16834 

3C 004  ICE 

STA 

NSRTBT+2 

212 

041C4 

1 6836 

6008 

JU 

NSRTBT 

213 

041C5 

16837 

0700 

213 

04106 

16838 

1 4004 104 

DOT 

LDA 

LORINS 

214 

04  ICS 

16840 

3C0041C E 

STA 

NSRTBT+2 

215 

041CA 

16842 

6002 

JU 

NSRTBT 

216 

♦ 

217 

♦ROUTINE  TO 

INSEPT  A ONE  OP  ZERO  INTO  THE  SCNBUE  UOPO 

218 

041CB 

16843 

0700 

218 

04  ICC 

16844 

14604116 

NSPTBT 

LDA 

SCNBUE. 12 

219 

041CE 

16846 

C5809444 

LOR 

BMSK1 . 3 

220 

041D0 

16848 

306041 16 

STA 

SCNBUF. 4 2 

221 

041D2 

16850 

6C1A0002 

IMP 

3.2.M 

222 

041D4 

16852 

241B0040 

ICL 

3.DPUX2.M  END  OF  URD  IN  SCNBUF? 

223 

041D6 

16854 

600A 

JU 

TST1  VES 

223 

041B7 

16855 

0700 

284 

041  DP 

16856 

6C120001 

NSRTB1 

IMP 

2.1.M  NO 

825 

041I.A 

16859 

241 14108 

ICL 

2. MAG  MAGNIF  OF  BIT  COMPLETE? 

226 

041  DC 

16860 

600A 

JU 

TST2  VES 

826 

041  DP 

16861 

0700 

227 

041DE 

16862 

6092 

JU 

NSPTBT  NO 

828 

♦ 

e29 

♦THE  END  OF 

A 

URD  UITHIN  THE  SCNBUE  UAS  REACHED 

230 

041  DF 

16863 

0700 

230 

041E0 

16864 

5C1A0000 

TST1 

LDX 

3.0.M  RESET  SCNBUF  BIT  PTR 

231 

041E2 

16866 

6C620002 

IMP 

12. 2. M INC  SCNBUF  URD  CTR 

232 

04 1 E 4 

16868 

608  C 

JU 

NSPTB1 

233 

♦ 

234 

♦THE  SVMBOL 

MATRIX  BIT  HAS  BEEN  PROPERLV  MAGNIFIED 

235 

041E5 

16869 

0700 

235 

041  EG 

16870 

6C4A0001 

TST2 

IMP 

9. 1 .M 

836 

041E8 

16872 

244B0020 

ICL 

9.0PU.M  END  OF  SVMBOL  MATRIX  URD? 

237 

041EA 

16874 

6004 

JU 

TST3  VES 

237 

041EB 

16875 

0700 

238 

041EC 

16876 

60BA 

JU 

NXBIT  NO 

239 

♦ 

240 

♦ 

241 

♦THE  END  OF 

A 

SVMBOL  MATRIX  URD  UAS  PEACHED 

242 

041ED 

16877 

0700 

242 

041EE 

16878 

6C420002 

TST3 

IMP 

8.2.M  INC  TVRSTR  UPD  CTR 

243 

O41F0 

16880 

6C52000 1 

IMP 

10.1.M  INC  URD  UITHIN  LINE  CTR 

244 

041F2 

16882 

24530008 

ICL 

10.UPL.M  END  OF  SVMBOL  MATRIX  LINE 

245 

04  IF  4 

16884 

6004 

JU 

RTBRDR  VES 

245 

041F5 

16885 

0700 

246 

041F6 

16886 

60CA 

JU 

NXURD  NO 

89 
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247 

* 

248 

♦THE  END 

i OF  THE 

SYMBOL  MATRIX  LINE  UAS  REACHED, 

NOU 

249 

* INSERT 

‘ A RIGHT  BORDER 

250 

04  1 F 7 

16887 

0700 

250 

941F8 

16888 

14020001 

RTBRDR 

LDA 

1 .M 

251 

04 1 F A 

16890 

C 46 041 14 

LOR 

SCNBUF-2 . 12 

252 

041FC 

16892 

3C6041 14 

STA 

SCNBUF-3.12  INSERT  A RIGHT  BORDER 

253 

*TEST  TO 

' DETERMINE  IF  A HORIZ  GRID  LINE  IS  REQUIRED 

254 

04 IFE 

16894 

5C 1 20000 

LDX 

2.0.M 

255 

O420O 

16896 

6C6A0O01 

IMP 

13. 1 . M 

256 

04202 

16898 

246941 10 

ICL 

1 3.  V5PACE 

257 

04204 

16900 

60O4 

JU 

HGRID 

257 

04205 

16901 

0700 

258 

04206 

16902 

6018 

JU 

PPNT 

259 

t A H0R1Z 

! GRID  LINE  IS  REQUIRED 

260 

04207 

16903 

0700 

260 

04208 

16904 

6C120001 

HGRID 

IMP 

2.  1 . M 

261 

0420A 

16906 

640442BC 

JS 

PRNTLN 

262 

0420C 

16908 

6C 1 2000 1 

IMP 

2. 1 ,M 

263 

O420E 

16910 

24114108 

ICL 

2,  MAG 

264 

04210 

16912 

6004 

JU 

TSTS 

264 

04211 

16913 

0700 

265 

04212 

16914 

6088 

JU 

HGRID42 

266 

04213 

16915 

0700 

266 

04214 

16916 

5C6A00O0 

TST5 

LDX 

13.0.M 

267 

04216 

16918 

64044284 

JS 

CLRSCN 

268 

04218 

16920 

64044296 

JS 

filbuf 

269 

0421 A 

16922 

640442BC 

JS 

PRNTLN 

270 

042 1 C. 

16924 

6000 

JU 

TST4 

271 

♦A  HORIZ  GRID  LINE  IS  NOT  REQUIRED 

272 

042 1 D 

16925 

0700 

272 

0421E 

16926 

640442BC 

PRNT 

JS 

PRNTLN 

273 

04220 

16928 

6C 120001 

IMP 

3. 1 ,M 

274 

04222 

169  30 

24114108 

ICL 

2.  MAG 

275 

04224 

16932 

6004 

JU 

T5T4 

275 

04225 

16933 

0700 

276 

04226 

16934 

6088 

JU 

PRNT 

277 

t 

278 

* 

279 

♦ THE  RASTER  LINE  HAS  BEEN  OUTPUT  TO  THE  STATOS 

280 

04227 

16935 

0700 

280 

04228 

16936 

24431900 

TST4 

ICL 

8.RSTPU.M  END  OF  SYMBOL  MATRIX 

RASTER? 

281 

0422A 

16938 

6004 

JU 

PRNTDN  YES 

281 

0422B 

16939 

0700 

282 

04220 

16940 

643041 9E 

JU 

NXLINE  NO 

283 

♦ 

284 

* 

285 

•OUTPUTTING  OF 

THE  SYMBOL  MATRIX  IS  COMPLETE-  DISABLE  THE 

286 

♦ STATOS  AND  RETURN 

287 

0422E 

16942 

64044242 

PPNTDN 

JS 

RSETLP 

288 

04230 

16944 

7400949C 

RTA 

GLBRTN 

289 

♦ 

290 

* 

291 

♦STATOS 

PR  INTER -■'PLOTTER  ROUTINES 

292 

t 

293 

* 

294 

♦STATOS 

enable 

ROUTINE 

295 

00820 

2848 

LPNABL 

SETX 

0B20 

296 

04232 

16946 

PLPEBL 

BSS 

2 

297 

04234 

16948 

04004232 

LPEBL 

PTR 

PLPEBL 

298 

04236 

16950 

14A20P20 

LDA 

LPNABL. M LD  THE  CNTPL  URD 

299 

04238 

16952 

4AB1 

DOA 

22.C.K  OUTPUT  TO  STATOS 

300 

04239 

16953 

48B2 

LPEBL1 

DIA 

22  READ  THE  STATUS  URD 

301 

0423A 

16954 

80 020006 

SAM 

A.M  T5T  LP  NOT  RDY  AND  LP 

BSV 

302 

042  30 

16966 

74004232 

PTA 

RLPEBL 

303 

0423E 

16958 

64304239 

JGU 

LPEBL1  TST  AGAIN 

304 

* 

305 

♦STATOS 

SYSTEM 

RESET 

90  1 
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306 

08000 

32769 

LPPSET 

SETX 

8000 

307 

04240 

16960 

PP  SET 

BSS 

308 

04242 

1 6962 

04004240 

psetlp 

PTP 

PPS6T 

309 

04244 

16964 

1 40,23000 

LDA 

LPPSET. M 

L.D  PF SET  OMD  UPD 

310 

04246 

16966 

4AB1 

DOA 

22. C . K 

SFNfc  TO  STATOS 

311 

04847 

16967 

0700 

311 

04248 

16968 

740O4P40 

PTA 

PP  SET 

312 

* 

313 

tSTATOS 

TO  PASTER  mode 

314 

0086  0 

3040 

LPPSTP 

SETX 

0BF0 

315 

042  4 A 

16970 

PLPPST 

BSS 

2 

316 

0424C 

16972 

0400424A 

PSTRMD 

PTP 

PLPPST 

317 

04246 

16r>74 

1 4020BE0 

LDA 

LPPSTR.M 

LD  CNTRL  UPD 

318 

0 4250 

1 6076 

4AR1 

DOA 

22.C.K 

SFND  TO  STATOS 

319 

0 42C>1 

16977 

4382 

PSTPM1 

DIA 

22 

READ  STATUS  UPD 

320 

04252 

16978 

8C02000C 

SAM 

12.  M 

TST  LP  BSV  AMD  PC 

BSV 

321 

04254 

16980 

7400424 A 

PTA 

PLPPST 

322 

04266 

16092 

64104251 

JGU 

RSTPMl 

TST  AGAIN 

323 

* 

324 

tSTATOS 

TOP 

or  roPM 

325 

00BB3 

2996 

LPTOF 

SE  TX 

0DD3 

326 

04258 

16034 

PTOF 

BSS 

2 

327 

04260 

16986 

04004268 

TOF 

PTP 

PTOF 

328 

0425C 

16088 

1 4020nB3 

LDA 

LPTOF . M 

LO  TOF  CMD  UP.D 

329 

04266 

1 6090 

4AB1 

DOA 

22  . C . K 

SEND  TO  STATOS 

330 

04256 

1 609  1 

43B2 

TOF  1 

DIA 

22 

TST  LP  BSV  AMD 

PC 

BSV 

331 

04260 

1 6992 

8C  02000C 

SAM 

12. M 

TST  LP  BSV  AND 

PC 

BSV 

332 

04262 

1 6994 

74004258 

PTA 

PTOF 

333 

04264 

1 6096 

64304P5F 

JGU 

TOF  1 

TST  AGAIN 

334 

t 

335 

•ROUTINE 

TO 

SVNC  THE  SCAN 

LINE.  PTR 

336 

00PA2 

2078 

SVNCLN 

SETX 

0BA2 

337 

04266 

16008 

PSVMC 

BSS 

2 

338 

04268 

17000 

04004266 

SVNC 

PTR 

RSVNC 

339 

0426A 

17002 

1 4020BA2 

LDA 

SVNCLN. M 

LD  SVNC  CMD  URD 

340 

0426C 

1 7064 

4AB1 

DOA 

22. C .K 

SEND  TO  STATOS 

341 

0426D 

17005 

48B2 

SVNC1 

DIA 

22 

READ  THE  STATUS 

URD 

342 

0426E 

17006 

8602000C 

Sam 

12.  M 

T5T  LP  BSV  AND 

PC 

BSV 

343 

04270 

1700* 

74004266 

PTA 

RSVNC 

344 

04272 

17010 

6 4 30 426 D 

JGU 

SVNC  1 

TST  AGAIN 

345 

• 

346 

tSTATOS 

SVHC'STEP  ROUTINE 

347 

00B23 

2851 

LPSTEP 

SFTX 

0B23 

348 

04274 

17012 

PST6P5 

BSS 

2 

349 

04276 

17014 

04004274 

STEPS 

PTP 

PSTFPS 

350 

04278 

1 7016 

1 4020B23 

LDA 

LPSTEP. M 

LD  SVNC7STEP  CMD 

UPD 

351 

0427A 

17018 

4 AB 1 

DOA 

22.C.X 

SEND  TO  STATOS 

352 

0427B 

1 7010 

48B2 

5TEPS1 

DIA 

22 

READ  THE  STATUS 

UPD 

353 

0427C 

1 7020 

8602000r 

SAM 

12. M 

TST  LP  BSV  AND 

PC 

BSV 

354 

04276 

17022 

74004274 

PTA 

PSTEPS 

355 

04280 

17024 

64 10427 B 

JGU 

STEPS1 

TST  AGAIN 

356 

t 

357 

tPOUTINE  TO 

CLEAR  THE  SCAN  LINE  BUFFER  '44 

FULL  UPDS) 

358 

04282 

17026 

PCLPSN 

BSS 

2 

359 

04284 

17028 

04004282 

CLPSCN 

PTP 

PCLPSN 

360 

04286 

17010 

1 4020000 

LDA 

0.M 

361 

04288 

17032 

0660 

LXA 

12 

362 

04289 

17013 

0700 

362 

0428A 

17034 

3C6041 16 

CLBNX 

STA 

SCNBUE. 12 

CLP  NX  UPD 

363 

0428C 

17036 

60620002 

IMP 

12. 2. M 

364 

04286 

17038 

24630058 

ICL 

12.88.H 

365 

04290 

1 7040 

74004282 

PTA 

RCLPSN 

366 

04292 

17042 

6430428A 

JOU 

CLPNX 

CLR  NEXT  URD 
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LINE  BBS  ADE'PESS  INSTCODE  SOURCE  STATEMENT 


FPOUTINE  TO  FILL  THE  SCAN  LINE  BUFFER 
» FOR  THE  TOP  AND  BOTTOM  BORDER 


3?e 

04294 

17044 

reilbe 

BSS 

2 

371 

04296 

17046 

04004294 

EILBUE 

PTR 

REILPE 

372 

04298 

17043 

5C6200O0 

LDX 

12, 0. M 

373 

0429A 

17050 

14009486 

L DA 

ONES 

374 

0429C 

17052 

30 604 1 16 

EILBE1 

STA 

SCNBUE . 12 

375 

0429E 

17054 

6C620002 

IMP 

12. 2. M 

376 

042A0 

17056 

24614112 

ICL 

12,  IJPLXMG 

377 

042A2 

17058 

74004294 

RTA 

reilbe 

378 

042A4 

17060 

64304290 

JGU 

E ILBE1 

379 

* 

380 

♦ROUTINE  TO 

INSEPT  VERTICAL  GRID  LINES 

381 

042A6 

17962 

RVGPID 

BSS 

2 

382 

042A8 

17064 

04O042A6 

VGRID 

PTP 

RVGPID 

383 

042AA 

17066 

50620000 

LDX 

12, 0.M 

384 

042AC 

17069 

1 4009444 

LDA 

BMSK  1 

385 

042AE 

17070 

3«:604  1 16 

VGRIDl 

STA 

SCNBUE,  12 

386 

042B0 

17072 

60604 10E 

IMP 

12, MSP ACE 

387 

042B2 

17074 

246141 12 

ICL 

12. UPLXMG 

388 

042B4 

17076 

740042A6 

RTA 

RVGPID 

389 

042B6 

17078 

643042AE 

JGU 

VGRIDl 

390 

* 

391 

♦ROUTINE  TO 

OUTPUT  A SINGLE  LINE  TO  THE  STATOS  US 

392 

* E OR 

44  FULL  URDS 

393 

00600 

1536 

DMASTRT 

SETX 

0600 

394 

042B8 

17080 

RPRNTL 

BSS 

2 

395 

042BA 

17082 

EO300000 

UCCMP 

HEX 

ED300000  -l'S  COMP  OF  44  PLACED  II 

396 

042BC 

17084 

040042B8 

PRNTLN 

PTR 

RPRNTL 

397 

042BE 

17086 

340041 16 

DMASET 

LAE 

SCNBUE  LD  STRTING  ADDR 

398 

04200 

17088 

0041 

SPA 

1 COMPUTE  FULL  URD  ADDR 

399 

0420  1 

17089 

0700 

399 

04202 

17090 

C40042BA 

LOP 

UCCMP  INSRT  l'S  COMP  OF  URD  CNT 

400 

0420  4 

170*2 

48B1 

DO  A 

22. K SEND  TO  STATOS 

401 

042C5 

17093 

49B2 

DMA1 

DIA 

22 

402 

042C6 

17094 

8C02000C 

SAM 

12, M TST  LP  BSY  AND  PC  BSY 

403 

042C8 

17096 

6004 

JU 

STRTDM  GO  TO  DMA  STRT 

403 

042C9 

17097 

0700 

404 

042CA 

17098 

6085 

JU 

DMA1  TST  AGAIN 

405 

042CB 

17099 

0700 

405 

042CC 

17100 

i4eeee00 

STRTDM 

L DA 

DMASTRT ,M 

406 

042CE 

17102 

4AB1 

DOA 

ee.C,K  SEND  TO  STATOS 

407 

042CF 

17103 

4BB2 

STRTD1 

DIA 

ea 

468 

84800 

17164 

80030004 

SAM 

4 , M TBT  LP  BSY 

409 

042D2 

17106 

6003 

JU 

EBLINT 

409 

04203 

17107 

0700 

410 

042D4 

17108 

6035 

JU 

STRTD1 

411 

04BDB 

17100 

008# 

EBLINT 

EMI 

ENABLE  MEMORY  INTERRUPT 

412 

04aD6 

171  10 

48B2 

DIA 

22 

413 

042D7 

17111 

0700 

413 

042D8 

17112 

8^020001 

SAM 

l . M TST  FOR  I.ICZ 

414 

042DA 

17114 

6094 

JU 

*-4 

414 

042DB 

171  15 

0700 

415 

042DC 

17116 

64044276 

JS 

STEPS  DO  A SVNC/STEP 

416 

042DE 

171  19 

740O42B8 

RTA 

RPRNTL 

ijjc pv  .3  *,2 T- 7P 
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